mirror of https://github.com/fltk/fltk
832 lines
22 KiB
C++
832 lines
22 KiB
C++
//
|
|
// "$Id$"
|
|
//
|
|
// Fractal drawing demo for the Fast Light Tool Kit (FLTK).
|
|
//
|
|
// This is a GLUT demo program, with modifications to
|
|
// demonstrate how to add FLTK controls to a GLUT program. The GLUT
|
|
// code is unchanged except for the end (search for FLTK to find changes).
|
|
//
|
|
// Copyright 1998-2016 by Bill Spitzak and others.
|
|
//
|
|
// This library is free software. Distribution and use rights are outlined in
|
|
// the file "COPYING" which should have been included with this file. If this
|
|
// file is missing or damaged, see the license at:
|
|
//
|
|
// http://www.fltk.org/COPYING.php
|
|
//
|
|
// Please report all bugs and problems on the following page:
|
|
//
|
|
// http://www.fltk.org/str.php
|
|
//
|
|
|
|
#include <config.h>
|
|
#if !HAVE_GL || !HAVE_GL_GLU_H
|
|
#include <FL/Fl.H>
|
|
#include <FL/fl_message.H>
|
|
int main(int, char**) {
|
|
fl_alert("This demo does not work without GL and GLU");
|
|
return 1;
|
|
}
|
|
#else
|
|
/*
|
|
* To compile: cc -o fractals fractals.c -lGL -lGLU -lX11 -lglut -lXmu -lm
|
|
*
|
|
* Usage: fractals
|
|
*
|
|
* Homework 6, Part 2: fractal mountains and fractal trees
|
|
* (Pretty Late)
|
|
*
|
|
* Draws fractal mountains and trees -- and an island of mountains in water
|
|
* (I tried having trees on the island but it didn't work too well.)
|
|
*
|
|
* Two viewer modes: polar and flying (both restrained to y>0 for up vector).
|
|
* Keyboard 0->9 and +/- control speed when flying.
|
|
*
|
|
* Only keyboard commands are 0-9 and +/- for speed in flying mode.
|
|
*
|
|
* Fog would make the island look much better, but I couldn't get it to work
|
|
* correctly. Would line up on -z axis not from eye.
|
|
*
|
|
* Philip Winston - 3/4/95
|
|
* pwinston@hmc.edu
|
|
* http://www.cs.hmc.edu/people/pwinston
|
|
*
|
|
*/
|
|
|
|
#include <FL/glut.H>
|
|
#include <FL/glu.h>
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <math.h>
|
|
#include <limits.h> /* ULONG_MAX is defined here */
|
|
#include <float.h> /* FLT_MAX is atleast defined here */
|
|
|
|
#include <time.h> /* for random seed */
|
|
|
|
#include "fracviewer.h"
|
|
|
|
#if defined(_WIN32)
|
|
# define drand48() (((float) rand())/((float) RAND_MAX))
|
|
# define srand48(x) (srand((x)))
|
|
#elif defined __APPLE__
|
|
# define drand48() (((float) rand())/((float) RAND_MAX))
|
|
# define srand48(x) (srand((x)))
|
|
#endif
|
|
|
|
typedef enum { NOTALLOWED, MOUNTAIN, TREE, ISLAND, BIGMTN, STEM, LEAF,
|
|
MOUNTAIN_MAT, WATER_MAT, LEAF_MAT, TREE_MAT, STEMANDLEAVES,
|
|
AXES } DisplayLists;
|
|
|
|
#define MAXLEVEL 8
|
|
|
|
int Rebuild = 1, /* Rebuild display list in next display? */
|
|
fractal = TREE, /* What fractal are we building */
|
|
Level = 4; /* levels of recursion for fractals */
|
|
|
|
int DrawAxes = 0;
|
|
|
|
/***************************************************************/
|
|
/************************* VECTOR JUNK *************************/
|
|
/***************************************************************/
|
|
|
|
/* print vertex to stderr */
|
|
void printvert(float v[3])
|
|
{
|
|
fprintf(stderr, "(%f, %f, %f)\n", v[0], v[1], v[2]);
|
|
}
|
|
|
|
#if 0 // removed for FL, it is in fracviewer.c
|
|
/* normalizes v */
|
|
void normalize(GLfloat v[3])
|
|
{
|
|
GLfloat d = sqrt(v[0]*v[0] + v[1]*v[1] + v[2]*v[2]);
|
|
|
|
if (d == 0)
|
|
fprintf(stderr, "Zero length vector in normalize\n");
|
|
else
|
|
v[0] /= d; v[1] /= d; v[2] /= d;
|
|
}
|
|
|
|
/* calculates a normalized crossproduct to v1, v2 */
|
|
void ncrossprod(float v1[3], float v2[3], float cp[3])
|
|
{
|
|
cp[0] = v1[1]*v2[2] - v1[2]*v2[1];
|
|
cp[1] = v1[2]*v2[0] - v1[0]*v2[2];
|
|
cp[2] = v1[0]*v2[1] - v1[1]*v2[0];
|
|
normalize(cp);
|
|
}
|
|
#endif
|
|
|
|
/* calculates normal to the triangle designated by v1, v2, v3 */
|
|
void triagnormal(float v1[3], float v2[3], float v3[3], float norm[3])
|
|
{
|
|
float vec1[3], vec2[3];
|
|
|
|
vec1[0] = v3[0] - v1[0]; vec2[0] = v2[0] - v1[0];
|
|
vec1[1] = v3[1] - v1[1]; vec2[1] = v2[1] - v1[1];
|
|
vec1[2] = v3[2] - v1[2]; vec2[2] = v2[2] - v1[2];
|
|
|
|
ncrossprod(vec2, vec1, norm);
|
|
}
|
|
|
|
float xzlength(float v1[3], float v2[3])
|
|
{
|
|
return sqrt((v1[0] - v2[0])*(v1[0] - v2[0]) +
|
|
(v1[2] - v2[2])*(v1[2] - v2[2]));
|
|
}
|
|
|
|
float xzslope(float v1[3], float v2[3])
|
|
{
|
|
return ((v1[0] != v2[0]) ? ((v1[2] - v2[2]) / (v1[0] - v2[0]))
|
|
: FLT_MAX);
|
|
}
|
|
|
|
|
|
/***************************************************************/
|
|
/************************ MOUNTAIN STUFF ***********************/
|
|
/***************************************************************/
|
|
|
|
GLfloat DispFactor[MAXLEVEL]; /* Array of what to multiply random number
|
|
by for a given level to get midpoint
|
|
displacement */
|
|
GLfloat DispBias[MAXLEVEL]; /* Array of what to add to random number
|
|
before multiplying it by DispFactor */
|
|
|
|
#define NUMRANDS 191
|
|
float RandTable[NUMRANDS]; /* hash table of random numbers so we can
|
|
raise the same midpoints by the same amount */
|
|
|
|
/* The following are for permitting an edge of a moutain to be */
|
|
/* pegged so it won't be displaced up or down. This makes it */
|
|
/* easier to setup scenes and makes a single moutain look better */
|
|
|
|
GLfloat Verts[3][3], /* Vertices of outside edges of mountain */
|
|
Slopes[3]; /* Slopes between these outside edges */
|
|
int Pegged[3]; /* Is this edge pegged or not */
|
|
|
|
/*
|
|
* Comes up with a new table of random numbers [0,1)
|
|
*/
|
|
void InitRandTable(unsigned int seed)
|
|
{
|
|
int i;
|
|
|
|
srand48((long) seed);
|
|
for (i = 0; i < NUMRANDS; i++)
|
|
RandTable[i] = drand48() - 0.5;
|
|
}
|
|
|
|
/* calculate midpoint and displace it if required */
|
|
void Midpoint(GLfloat mid[3], GLfloat v1[3], GLfloat v2[3],
|
|
int edge, int level)
|
|
{
|
|
unsigned hash;
|
|
|
|
mid[0] = (v1[0] + v2[0]) / 2;
|
|
mid[1] = (v1[1] + v2[1]) / 2;
|
|
mid[2] = (v1[2] + v2[2]) / 2;
|
|
if (!Pegged[edge] || (fabs(xzslope(Verts[edge], mid)
|
|
- Slopes[edge]) > 0.00001)) {
|
|
srand48((int)((v1[0]+v2[0])*23344));
|
|
hash = unsigned(drand48() * 7334334);
|
|
srand48((int)((v2[2]+v1[2])*43433));
|
|
hash = (unsigned)(drand48() * 634344 + hash) % NUMRANDS;
|
|
mid[1] += ((RandTable[hash] + DispBias[level]) * DispFactor[level]);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Recursive moutain drawing routine -- from lecture with addition of
|
|
* allowing an edge to be pegged. This function requires the above
|
|
* globals to be set, as well as the Level global for fractal level
|
|
*/
|
|
static float cutoff = -1;
|
|
|
|
void FMR(GLfloat v1[3], GLfloat v2[3], GLfloat v3[3], int level)
|
|
{
|
|
if (level == Level) {
|
|
GLfloat norm[3];
|
|
if (v1[1] <= cutoff && v2[1]<=cutoff && v3[1]<=cutoff) return;
|
|
triagnormal(v1, v2, v3, norm);
|
|
glNormal3fv(norm);
|
|
glVertex3fv(v1);
|
|
glVertex3fv(v2);
|
|
glVertex3fv(v3);
|
|
|
|
} else {
|
|
GLfloat m1[3], m2[3], m3[3];
|
|
|
|
Midpoint(m1, v1, v2, 0, level);
|
|
Midpoint(m2, v2, v3, 1, level);
|
|
Midpoint(m3, v3, v1, 2, level);
|
|
|
|
FMR(v1, m1, m3, level + 1);
|
|
FMR(m1, v2, m2, level + 1);
|
|
FMR(m3, m2, v3, level + 1);
|
|
FMR(m1, m2, m3, level + 1);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* sets up lookup tables and calls recursive mountain function
|
|
*/
|
|
void FractalMountain(GLfloat v1[3], GLfloat v2[3], GLfloat v3[3],
|
|
int pegged[3])
|
|
{
|
|
GLfloat lengths[MAXLEVEL];
|
|
GLfloat fraction[8] = { 0.3, 0.3, 0.4, 0.2, 0.3, 0.2, 0.4, 0.4 };
|
|
GLfloat bias[8] = { 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1, 0.1 };
|
|
int i;
|
|
float avglen = (xzlength(v1, v2) +
|
|
xzlength(v2, v3) +
|
|
xzlength(v3, v1) / 3);
|
|
|
|
for (i = 0; i < 3; i++) {
|
|
Verts[0][i] = v1[i]; /* set mountain vertex globals */
|
|
Verts[1][i] = v2[i];
|
|
Verts[2][i] = v3[i];
|
|
Pegged[i] = pegged[i];
|
|
}
|
|
|
|
Slopes[0] = xzslope(Verts[0], Verts[1]); /* set edge slope globals */
|
|
Slopes[1] = xzslope(Verts[1], Verts[2]);
|
|
Slopes[2] = xzslope(Verts[2], Verts[0]);
|
|
|
|
lengths[0] = avglen;
|
|
for (i = 1; i < Level; i++) {
|
|
lengths[i] = lengths[i-1]/2; /* compute edge length for each level */
|
|
}
|
|
|
|
for (i = 0; i < Level; i++) { /* DispFactor and DispBias arrays */
|
|
DispFactor[i] = (lengths[i] * ((i <= 7) ? fraction[i] : fraction[7]));
|
|
DispBias[i] = ((i <= 7) ? bias[i] : bias[7]);
|
|
}
|
|
|
|
glBegin(GL_TRIANGLES);
|
|
FMR(v1, v2, v3, 0); /* issues no GL but vertex calls */
|
|
glEnd();
|
|
}
|
|
|
|
/*
|
|
* draw a mountain and build the display list
|
|
*/
|
|
void CreateMountain(void)
|
|
{
|
|
GLfloat v1[3] = { 0, 0, -1 }, v2[3] = { -1, 0, 1 }, v3[3] = { 1, 0, 1 };
|
|
int pegged[3] = { 1, 1, 1 };
|
|
|
|
glNewList(MOUNTAIN, GL_COMPILE);
|
|
glPushAttrib(GL_LIGHTING_BIT);
|
|
glCallList(MOUNTAIN_MAT);
|
|
FractalMountain(v1, v2, v3, pegged);
|
|
glPopAttrib();
|
|
glEndList();
|
|
}
|
|
|
|
/*
|
|
* new random numbers to make a different moutain
|
|
*/
|
|
void NewMountain(void)
|
|
{
|
|
InitRandTable(time(NULL));
|
|
}
|
|
|
|
/***************************************************************/
|
|
/***************************** TREE ****************************/
|
|
/***************************************************************/
|
|
|
|
long TreeSeed; /* for srand48 - remember so we can build "same tree"
|
|
at a different level */
|
|
|
|
/*
|
|
* recursive tree drawing thing, fleshed out from class notes pseudocode
|
|
*/
|
|
void FractalTree(int level, long level_seed)
|
|
{
|
|
if (level == Level) {
|
|
glPushMatrix();
|
|
glRotatef(drand48()*180, 0, 1, 0);
|
|
glCallList(STEMANDLEAVES);
|
|
glPopMatrix();
|
|
} else {
|
|
glCallList(STEM);
|
|
glPushMatrix();
|
|
glRotatef(drand48()*180, 0, 1, 0);
|
|
glTranslatef(0, 1, 0);
|
|
glScalef(0.7, 0.7, 0.7);
|
|
|
|
srand48(level_seed+1);
|
|
glPushMatrix();
|
|
glRotatef(110 + drand48()*40, 0, 1, 0);
|
|
glRotatef(30 + drand48()*20, 0, 0, 1);
|
|
FractalTree(level + 1, level_seed+4);
|
|
glPopMatrix();
|
|
|
|
srand48(level_seed+2);
|
|
glPushMatrix();
|
|
glRotatef(-130 + drand48()*40, 0, 1, 0);
|
|
glRotatef(30 + drand48()*20, 0, 0, 1);
|
|
FractalTree(level + 1, level_seed+5);
|
|
glPopMatrix();
|
|
|
|
srand48(level_seed+3);
|
|
glPushMatrix();
|
|
glRotatef(-20 + drand48()*40, 0, 1, 0);
|
|
glRotatef(30 + drand48()*20, 0, 0, 1);
|
|
FractalTree(level + 1, level_seed+6);
|
|
glPopMatrix();
|
|
|
|
glPopMatrix();
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Create display lists for a leaf, a set of leaves, and a stem
|
|
*/
|
|
void CreateTreeLists(void)
|
|
{
|
|
GLUquadricObj *cylquad = gluNewQuadric();
|
|
int i;
|
|
|
|
glNewList(STEM, GL_COMPILE);
|
|
glPushMatrix();
|
|
glRotatef(-90, 1, 0, 0);
|
|
gluCylinder(cylquad, 0.1, 0.08, 1, 10, 2 );
|
|
glPopMatrix();
|
|
glEndList();
|
|
|
|
glNewList(LEAF, GL_COMPILE); /* I think this was jeff allen's leaf idea */
|
|
glBegin(GL_TRIANGLES);
|
|
glNormal3f(-0.1, 0, 0.25); /* not normalized */
|
|
glVertex3f(0, 0, 0);
|
|
glVertex3f(0.25, 0.25, 0.1);
|
|
glVertex3f(0, 0.5, 0);
|
|
|
|
glNormal3f(0.1, 0, 0.25);
|
|
glVertex3f(0, 0, 0);
|
|
glVertex3f(0, 0.5, 0);
|
|
glVertex3f(-0.25, 0.25, 0.1);
|
|
glEnd();
|
|
glEndList();
|
|
|
|
glNewList(STEMANDLEAVES, GL_COMPILE);
|
|
glPushMatrix();
|
|
glPushAttrib(GL_LIGHTING_BIT);
|
|
glCallList(STEM);
|
|
glCallList(LEAF_MAT);
|
|
for(i = 0; i < 3; i++) {
|
|
glTranslatef(0, 0.333, 0);
|
|
glRotatef(90, 0, 1, 0);
|
|
glPushMatrix();
|
|
glRotatef(0, 0, 1, 0);
|
|
glRotatef(50, 1, 0, 0);
|
|
glCallList(LEAF);
|
|
glPopMatrix();
|
|
glPushMatrix();
|
|
glRotatef(180, 0, 1, 0);
|
|
glRotatef(60, 1, 0, 0);
|
|
glCallList(LEAF);
|
|
glPopMatrix();
|
|
}
|
|
glPopAttrib();
|
|
glPopMatrix();
|
|
glEndList();
|
|
|
|
gluDeleteQuadric(cylquad);
|
|
}
|
|
|
|
/*
|
|
* draw and build display list for tree
|
|
*/
|
|
void CreateTree(void)
|
|
{
|
|
srand48(TreeSeed);
|
|
|
|
glNewList(TREE, GL_COMPILE);
|
|
glPushMatrix();
|
|
glPushAttrib(GL_LIGHTING_BIT);
|
|
glCallList(TREE_MAT);
|
|
glTranslatef(0, -1, 0);
|
|
FractalTree(0, TreeSeed);
|
|
glPopAttrib();
|
|
glPopMatrix();
|
|
glEndList();
|
|
}
|
|
|
|
/*
|
|
* new seed for a new tree (groan)
|
|
*/
|
|
void NewTree(void)
|
|
{
|
|
TreeSeed = time(NULL);
|
|
}
|
|
|
|
/***************************************************************/
|
|
/*********************** FRACTAL PLANET ************************/
|
|
/***************************************************************/
|
|
|
|
void CreateIsland(void)
|
|
{
|
|
cutoff = .06;
|
|
CreateMountain();
|
|
cutoff = -1;
|
|
glNewList(ISLAND, GL_COMPILE);
|
|
glPushAttrib(GL_LIGHTING_BIT);
|
|
glMatrixMode(GL_MODELVIEW);
|
|
glPushMatrix();
|
|
glCallList(WATER_MAT);
|
|
|
|
glBegin(GL_QUADS);
|
|
glNormal3f(0, 1, 0);
|
|
glVertex3f(10, 0.01, 10);
|
|
glVertex3f(10, 0.01, -10);
|
|
glVertex3f(-10, 0.01, -10);
|
|
glVertex3f(-10, 0.01, 10);
|
|
glEnd();
|
|
|
|
glPushMatrix();
|
|
glTranslatef(0, -0.1, 0);
|
|
glCallList(MOUNTAIN);
|
|
glPopMatrix();
|
|
|
|
glPushMatrix();
|
|
glRotatef(135, 0, 1, 0);
|
|
glTranslatef(0.2, -0.15, -0.4);
|
|
glCallList(MOUNTAIN);
|
|
glPopMatrix();
|
|
|
|
glPushMatrix();
|
|
glRotatef(-60, 0, 1, 0);
|
|
glTranslatef(0.7, -0.07, 0.5);
|
|
glCallList(MOUNTAIN);
|
|
glPopMatrix();
|
|
|
|
glPushMatrix();
|
|
glRotatef(-175, 0, 1, 0);
|
|
glTranslatef(-0.7, -0.05, -0.5);
|
|
glCallList(MOUNTAIN);
|
|
glPopMatrix();
|
|
|
|
glPushMatrix();
|
|
glRotatef(165, 0, 1, 0);
|
|
glTranslatef(-0.9, -0.12, 0.0);
|
|
glCallList(MOUNTAIN);
|
|
glPopMatrix();
|
|
|
|
glPopMatrix();
|
|
glPopAttrib();
|
|
glEndList();
|
|
}
|
|
|
|
|
|
void NewFractals(void)
|
|
{
|
|
NewMountain();
|
|
NewTree();
|
|
}
|
|
|
|
void Create(int fract)
|
|
{
|
|
switch(fract) {
|
|
case MOUNTAIN:
|
|
CreateMountain();
|
|
break;
|
|
case TREE:
|
|
CreateTree();
|
|
break;
|
|
case ISLAND:
|
|
CreateIsland();
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
/***************************************************************/
|
|
/**************************** OPENGL ***************************/
|
|
/***************************************************************/
|
|
|
|
|
|
void SetupMaterials(void)
|
|
{
|
|
GLfloat mtn_ambuse[] = { 0.426, 0.256, 0.108, 1.0 };
|
|
GLfloat mtn_specular[] = { 0.394, 0.272, 0.167, 1.0 };
|
|
GLfloat mtn_shininess[] = { 10 };
|
|
|
|
GLfloat water_ambuse[] = { 0.0, 0.1, 0.5, 1.0 };
|
|
GLfloat water_specular[] = { 0.0, 0.1, 0.5, 1.0 };
|
|
GLfloat water_shininess[] = { 10 };
|
|
|
|
GLfloat tree_ambuse[] = { 0.4, 0.25, 0.1, 1.0 };
|
|
GLfloat tree_specular[] = { 0.0, 0.0, 0.0, 1.0 };
|
|
GLfloat tree_shininess[] = { 0 };
|
|
|
|
GLfloat leaf_ambuse[] = { 0.0, 0.8, 0.0, 1.0 };
|
|
GLfloat leaf_specular[] = { 0.0, 0.8, 0.0, 1.0 };
|
|
GLfloat leaf_shininess[] = { 10 };
|
|
|
|
glNewList(MOUNTAIN_MAT, GL_COMPILE);
|
|
glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, mtn_ambuse);
|
|
glMaterialfv(GL_FRONT, GL_SPECULAR, mtn_specular);
|
|
glMaterialfv(GL_FRONT, GL_SHININESS, mtn_shininess);
|
|
glEndList();
|
|
|
|
glNewList(WATER_MAT, GL_COMPILE);
|
|
glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, water_ambuse);
|
|
glMaterialfv(GL_FRONT, GL_SPECULAR, water_specular);
|
|
glMaterialfv(GL_FRONT, GL_SHININESS, water_shininess);
|
|
glEndList();
|
|
|
|
glNewList(TREE_MAT, GL_COMPILE);
|
|
glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, tree_ambuse);
|
|
glMaterialfv(GL_FRONT, GL_SPECULAR, tree_specular);
|
|
glMaterialfv(GL_FRONT, GL_SHININESS, tree_shininess);
|
|
glEndList();
|
|
|
|
glNewList(LEAF_MAT, GL_COMPILE);
|
|
glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE, leaf_ambuse);
|
|
glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, leaf_specular);
|
|
glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, leaf_shininess);
|
|
glEndList();
|
|
}
|
|
|
|
void myGLInit(void)
|
|
{
|
|
GLfloat light_ambient[] = { 0.0, 0.0, 0.0, 1.0 };
|
|
GLfloat light_diffuse[] = { 1.0, 1.0, 1.0, 1.0 };
|
|
GLfloat light_specular[] = { 1.0, 1.0, 1.0, 1.0 };
|
|
GLfloat light_position[] = { 0.0, 0.3, 0.3, 0.0 };
|
|
|
|
GLfloat lmodel_ambient[] = { 0.4, 0.4, 0.4, 1.0 };
|
|
|
|
glLightfv(GL_LIGHT0, GL_AMBIENT, light_ambient);
|
|
glLightfv(GL_LIGHT0, GL_DIFFUSE, light_diffuse);
|
|
glLightfv(GL_LIGHT0, GL_SPECULAR, light_specular);
|
|
glLightfv(GL_LIGHT0, GL_POSITION, light_position);
|
|
|
|
glLightModelfv(GL_LIGHT_MODEL_AMBIENT, lmodel_ambient);
|
|
|
|
glEnable(GL_LIGHTING);
|
|
glEnable(GL_LIGHT0);
|
|
|
|
glDepthFunc(GL_LEQUAL);
|
|
glEnable(GL_DEPTH_TEST);
|
|
|
|
glEnable(GL_NORMALIZE);
|
|
#if 0
|
|
glEnable(GL_CULL_FACE);
|
|
glCullFace(GL_BACK);
|
|
#endif
|
|
|
|
glShadeModel(GL_SMOOTH);
|
|
#if 0
|
|
glEnable(GL_BLEND);
|
|
glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
|
|
#endif
|
|
|
|
SetupMaterials();
|
|
CreateTreeLists();
|
|
|
|
glFlush();
|
|
}
|
|
|
|
/***************************************************************/
|
|
/************************ GLUT STUFF ***************************/
|
|
/***************************************************************/
|
|
|
|
int winwidth = 1;
|
|
int winheight = 1;
|
|
|
|
void reshape(int w, int h)
|
|
{
|
|
glViewport(0,0,w,h);
|
|
|
|
winwidth = w;
|
|
winheight = h;
|
|
}
|
|
|
|
void display(void)
|
|
{
|
|
time_t curtime;
|
|
char buf[255];
|
|
static time_t fpstime = 0;
|
|
static int fpscount = 0;
|
|
static int fps = 0;
|
|
|
|
glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
|
|
|
|
glMatrixMode(GL_PROJECTION);
|
|
glLoadIdentity();
|
|
gluPerspective(60.0, (GLdouble)winwidth/winheight, 0.01, 100);
|
|
agvViewTransform();
|
|
|
|
glMatrixMode(GL_MODELVIEW);
|
|
glLoadIdentity();
|
|
|
|
if (Rebuild) {
|
|
Create(fractal);
|
|
Rebuild = 0;
|
|
}
|
|
|
|
glCallList(fractal);
|
|
|
|
if (DrawAxes)
|
|
glCallList(AXES);
|
|
|
|
glMatrixMode(GL_PROJECTION);
|
|
glLoadIdentity();
|
|
gluOrtho2D(0.0, winwidth, 0.0, winheight);
|
|
|
|
sprintf(buf, "FPS=%d", fps);
|
|
glColor3f(1.0f, 1.0f, 1.0f);
|
|
gl_font(FL_HELVETICA, 12);
|
|
gl_draw(buf, 10, 10);
|
|
|
|
//
|
|
// Use glFinish() instead of glFlush() to avoid getting many frames
|
|
// ahead of the display (problem with some Linux OpenGL implementations...)
|
|
//
|
|
|
|
glFinish();
|
|
|
|
// Update frames-per-second
|
|
fpscount ++;
|
|
curtime = time(NULL);
|
|
if ((curtime - fpstime) >= 2)
|
|
{
|
|
fps = (fps + fpscount / (curtime - fpstime)) / 2;
|
|
fpstime = curtime;
|
|
fpscount = 0;
|
|
}
|
|
}
|
|
|
|
void visible(int v)
|
|
{
|
|
if (v == GLUT_VISIBLE)
|
|
agvSetAllowIdle(1);
|
|
else {
|
|
glutIdleFunc(NULL);
|
|
agvSetAllowIdle(0);
|
|
}
|
|
}
|
|
|
|
void menuuse(int v)
|
|
{
|
|
if (v == GLUT_MENU_NOT_IN_USE)
|
|
agvSetAllowIdle(1);
|
|
else {
|
|
glutIdleFunc(NULL);
|
|
agvSetAllowIdle(0);
|
|
}
|
|
}
|
|
|
|
/***************************************************************/
|
|
/******************* MENU SETUP & HANDLING *********************/
|
|
/***************************************************************/
|
|
|
|
typedef enum { MENU_QUIT, MENU_RAND, MENU_MOVE, MENU_AXES } MenuChoices;
|
|
|
|
void setlevel(int value)
|
|
{
|
|
Level = value;
|
|
Rebuild = 1;
|
|
glutPostRedisplay();
|
|
}
|
|
|
|
void choosefract(int value)
|
|
{
|
|
fractal = value;
|
|
Rebuild = 1;
|
|
glutPostRedisplay();
|
|
}
|
|
|
|
void handlemenu(int value)
|
|
{
|
|
switch (value) {
|
|
case MENU_QUIT:
|
|
exit(0);
|
|
break;
|
|
case MENU_RAND:
|
|
NewFractals();
|
|
Rebuild = 1;
|
|
glutPostRedisplay();
|
|
break;
|
|
case MENU_AXES:
|
|
DrawAxes = !DrawAxes;
|
|
glutPostRedisplay();
|
|
break;
|
|
}
|
|
}
|
|
|
|
void MenuInit(void)
|
|
{
|
|
int submenu3, submenu2, submenu1;
|
|
|
|
submenu1 = glutCreateMenu(setlevel);
|
|
glutAddMenuEntry((char *)"0", 0); glutAddMenuEntry((char *)"1", 1);
|
|
glutAddMenuEntry((char *)"2", 2); glutAddMenuEntry((char *)"3", 3);
|
|
glutAddMenuEntry((char *)"4", 4); glutAddMenuEntry((char *)"5", 5);
|
|
glutAddMenuEntry((char *)"6", 6); glutAddMenuEntry((char *)"7", 7);
|
|
glutAddMenuEntry((char *)"8", 8);
|
|
|
|
submenu2 = glutCreateMenu(choosefract);
|
|
glutAddMenuEntry((char *)"Moutain", MOUNTAIN);
|
|
glutAddMenuEntry((char *)"Tree", TREE);
|
|
glutAddMenuEntry((char *)"Island", ISLAND);
|
|
|
|
submenu3 = glutCreateMenu(agvSwitchMoveMode);
|
|
glutAddMenuEntry((char *)"Flying", FLYING);
|
|
glutAddMenuEntry((char *)"Polar", POLAR);
|
|
|
|
glutCreateMenu(handlemenu);
|
|
glutAddSubMenu((char *)"Level", submenu1);
|
|
glutAddSubMenu((char *)"Fractal", submenu2);
|
|
glutAddSubMenu((char *)"Movement", submenu3);
|
|
glutAddMenuEntry((char *)"New Fractal", MENU_RAND);
|
|
glutAddMenuEntry((char *)"Toggle Axes", MENU_AXES);
|
|
glutAddMenuEntry((char *)"Quit", MENU_QUIT);
|
|
glutAttachMenu(GLUT_RIGHT_BUTTON);
|
|
}
|
|
|
|
|
|
/***************************************************************/
|
|
/**************************** MAIN *****************************/
|
|
/***************************************************************/
|
|
|
|
// FLTK-style callbacks to Glut menu callback translators:
|
|
void setlevel(Fl_Widget*, void *value) {setlevel(fl_intptr_t(value));}
|
|
|
|
void choosefract(Fl_Widget*, void *value) {choosefract(fl_intptr_t(value));}
|
|
|
|
void handlemenu(Fl_Widget*, void *value) {handlemenu(fl_intptr_t(value));}
|
|
|
|
#include <FL/Fl_Button.H>
|
|
#include <FL/Fl_Group.H>
|
|
#include <FL/Fl_Window.H>
|
|
|
|
int main(int argc, char** argv)
|
|
{
|
|
Fl::use_high_res_GL(1);
|
|
// glutInit(&argc, argv); // this line removed for FLTK
|
|
|
|
// create FLTK window:
|
|
Fl_Window window(512+20, 512+100);
|
|
window.resizable(window);
|
|
|
|
// create a bunch of buttons:
|
|
Fl_Group *g = new Fl_Group(110,50,400-110,30,"Level:");
|
|
g->align(FL_ALIGN_LEFT);
|
|
g->begin();
|
|
Fl_Button *b;
|
|
b = new Fl_Button(110,50,30,30,"0"); b->callback(setlevel,(void*)0);
|
|
b = new Fl_Button(140,50,30,30,"1"); b->callback(setlevel,(void*)1);
|
|
b = new Fl_Button(170,50,30,30,"2"); b->callback(setlevel,(void*)2);
|
|
b = new Fl_Button(200,50,30,30,"3"); b->callback(setlevel,(void*)3);
|
|
b = new Fl_Button(230,50,30,30,"4"); b->callback(setlevel,(void*)4);
|
|
b = new Fl_Button(260,50,30,30,"5"); b->callback(setlevel,(void*)5);
|
|
b = new Fl_Button(290,50,30,30,"6"); b->callback(setlevel,(void*)6);
|
|
b = new Fl_Button(320,50,30,30,"7"); b->callback(setlevel,(void*)7);
|
|
b = new Fl_Button(350,50,30,30,"8"); b->callback(setlevel,(void*)8);
|
|
g->end();
|
|
|
|
b = new Fl_Button(400,50,100,30,"New Fractal"); b->callback(handlemenu,(void*)MENU_RAND);
|
|
|
|
b = new Fl_Button( 10,10,100,30,"Mountain"); b->callback(choosefract,(void*)MOUNTAIN);
|
|
b = new Fl_Button(110,10,100,30,"Tree"); b->callback(choosefract,(void*)TREE);
|
|
b = new Fl_Button(210,10,100,30,"Island"); b->callback(choosefract,(void*)ISLAND);
|
|
b = new Fl_Button(400,10,100,30,"Quit"); b->callback(handlemenu,(void*)MENU_QUIT);
|
|
|
|
|
|
window.show(argc,argv); // glut will die unless parent window visible
|
|
window.begin(); // this will cause Glut window to be a child
|
|
glutInitWindowSize(512, 512);
|
|
glutInitWindowPosition(10,90); // place it inside parent window
|
|
glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGBA | GLUT_DEPTH | GLUT_MULTISAMPLE);
|
|
glutCreateWindow("Fractal Planet?");
|
|
window.end();
|
|
window.resizable(glut_window);
|
|
|
|
agvInit(1); /* 1 cause we don't have our own idle */
|
|
|
|
glutReshapeFunc(reshape);
|
|
glutDisplayFunc(display);
|
|
glutVisibilityFunc(visible);
|
|
glutMenuStateFunc(menuuse);
|
|
|
|
NewFractals();
|
|
agvMakeAxesList(AXES);
|
|
myGLInit();
|
|
MenuInit();
|
|
|
|
glutMainLoop(); // you could use Fl::run() instead
|
|
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
//
|
|
// End of "$Id$".
|
|
//
|