git.hungrycats.org Git - xscreensaver/blob - hacks/glx/endgame.c

   1 /*
   2  * endgame.c
   3  * plays through a chess game ending.  enjoy.
   4  *
   5  * version 1.0 - June 6, 2002
   6  *
   7  * Copyright (C) 2002 Blair Tennessy (tennessb@unbc.ca)
   8  *
   9  * Permission to use, copy, modify, distribute, and sell this software and its
  10  * documentation for any purpose is hereby granted without fee, provided that
  11  * the above copyright notice appear in all copies and that both that
  12  * copyright notice and this permission notice appear in supporting
  13  * documentation.  No representations are made about the suitability of this
  14  * software for any purpose.  It is provided "as is" without express or
  15  * implied warranty.
  16  */
  17
  18 #include <X11/Intrinsic.h>
  19
  20 #ifdef STANDALONE
  21 # define PROGCLASS        "Endgame"
  22 # define HACK_INIT        init_chess
  23 # define HACK_DRAW        draw_chess
  24 # define HACK_RESHAPE     reshape_chess
  25 # define HACK_HANDLE_EVENT chess_handle_event
  26 # define EVENT_MASK       PointerMotionMask
  27 # define chess_opts  xlockmore_opts
  28
  29 #define DEFAULTS       "*delay:     20000 \n" \
  30                        "*showFPS:   False \n" \
  31                        "*wireframe: False \n" \
  32
  33 # include "xlockmore.h"
  34
  35 #else
  36 # include "xlock.h"
  37 #endif
  38
  39 #ifdef USE_GL
  40
  41 #include <GL/glu.h>
  42 #include "gltrackball.h"
  43 #include "chessmodels.h"
  44
  45 #undef countof
  46 #define countof(x) (sizeof((x))/sizeof((*x)))
  47
  48 static XrmOptionDescRec opts[] = {
  49   {"+rotate", ".chess.rotate", XrmoptionNoArg, "false" },
  50   {"-rotate", ".chess.rotate", XrmoptionNoArg, "true" },
  51   {"+reflections", ".chess.reflections", XrmoptionNoArg, "false" },
  52   {"-reflections", ".chess.reflections", XrmoptionNoArg, "true" },
  53   {"+shadows", ".chess.shadows", XrmoptionNoArg, "false" },
  54   {"-shadows", ".chess.shadows", XrmoptionNoArg, "true" },
  55   {"+smooth", ".chess.smooth", XrmoptionNoArg, "false" },
  56   {"-smooth", ".chess.smooth", XrmoptionNoArg, "true" },
  57 };
  58
  59 int rotate, reflections, smooth, shadows;
  60
  61 static argtype vars[] = {
  62   {&rotate,      "rotate",      "Rotate",      "True", t_Bool},
  63   {&reflections, "reflections", "Reflections", "True", t_Bool},
  64   {&shadows, "shadows", "Shadows", "True", t_Bool},
  65   {&smooth,      "smooth",      "Smooth",      "True", t_Bool},
  66 };
  67
  68 ModeSpecOpt chess_opts = {countof(opts), opts, countof(vars), vars, NULL};
  69
  70 #ifdef USE_MODULES
  71 ModStruct   chess_description =
  72 {"chess", "init_chess", "draw_chess", "release_chess",
  73  "draw_chess", "init_chess", NULL, &chess_opts,
  74  1000, 1, 2, 1, 4, 1.0, "",
  75  "Chess", 0, NULL};
  76
  77 #endif
  78
  79 typedef struct {
  80   GLXContext *glx_context;
  81   Window window;
  82   trackball_state *trackball;
  83   Bool button_down_p;
  84 } Chesscreen;
  85
  86 static Chesscreen *qs = NULL;
  87
  88 #include <math.h>
  89 #include <sys/time.h>
  90 #include <stdio.h>
  91 #include <stdlib.h>
  92
  93 #ifndef M_PI
  94 #define M_PI 3.14159265
  95 #endif
  96
  97 #define BOARDSIZE 8
  98
  99 static float MaterialShadow[] =   {0.0, 0.0, 0.0, 0.3};
 100
 101
 102
 103 /** definition of white/black (orange/gray) colors */
 104 GLfloat colors[2][3] =
 105   {
 106     {1.0, 0.5, 0.0},
 107     {0.6, 0.6, 0.6},
 108   };
 109
 110 #define WHITES 5
 111
 112 /* i prefer silvertip */
 113 GLfloat whites[WHITES][3] =
 114   {
 115     {1.0, 0.55, 0.1},
 116     {0.8, 0.52, 0.8},
 117     {0.43, 0.54, 0.76},
 118     {0.8, 0.8, 0.8},
 119     {0.35, 0.60, 0.35},
 120   };
 121
 122 #include "chessgames.h"
 123
 124 ChessGame game;
 125 int oldwhite = -1;
 126
 127 void build_colors(void) {
 128
 129   /* find new white */
 130   int newwhite = oldwhite;
 131   while(newwhite == oldwhite)
 132     newwhite = random()%WHITES;
 133   oldwhite = newwhite;
 134
 135   colors[0][0] = whites[oldwhite][0];
 136   colors[0][1] = whites[oldwhite][1];
 137   colors[0][2] = whites[oldwhite][2];
 138 }
 139
 140 /* road texture */
 141 #define checkImageWidth 16
 142 #define checkImageHeight 16
 143 GLubyte checkImage[checkImageWidth][checkImageHeight][3];
 144 GLuint piecetexture, boardtexture;
 145
 146 /* build piece texture */
 147 void make_piece_texture(void) {
 148   int i, j, c;
 149
 150   for (i = 0; i < checkImageWidth; i++) {
 151     for (j = 0; j < checkImageHeight; j++) {
 152       c = ((j%2) == 0 || i%2 == 0) ? 240 : 180+random()%16;
 153       checkImage[i][j][0] = (GLubyte) c;
 154       checkImage[i][j][1] = (GLubyte) c;
 155       checkImage[i][j][2] = (GLubyte) c;
 156     }
 157   }
 158
 159   glGenTextures(1, &piecetexture);
 160   glBindTexture(GL_TEXTURE_2D, piecetexture);
 161
 162   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_LINEAR);
 163   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_LINEAR);
 164   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_S,GL_REPEAT);
 165   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_T,GL_REPEAT);
 166   glTexImage2D(GL_TEXTURE_2D, 0, 3, checkImageWidth,
 167                checkImageHeight, 0, GL_RGB, GL_UNSIGNED_BYTE,
 168                &checkImage[0][0]);
 169 }
 170
 171 /* build board texture (uniform noise in [180,180+50]) */
 172 void make_board_texture(void) {
 173   int i, j, c;
 174
 175   for (i = 0; i < checkImageWidth; i++) {
 176     for (j = 0; j < checkImageHeight; j++) {
 177       c = 180 + random()%51;
 178       checkImage[i][j][0] = (GLubyte) c;
 179       checkImage[i][j][1] = (GLubyte) c;
 180       checkImage[i][j][2] = (GLubyte) c;
 181     }
 182   }
 183
 184   glGenTextures(1, &boardtexture);
 185   glBindTexture(GL_TEXTURE_2D, boardtexture);
 186
 187   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_LINEAR);
 188   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_LINEAR);
 189   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_S,GL_REPEAT);
 190   glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_T,GL_REPEAT);
 191   glTexImage2D(GL_TEXTURE_2D, 0, 3, checkImageWidth,
 192                checkImageHeight, 0, GL_RGB, GL_UNSIGNED_BYTE,
 193                &checkImage[0][0]);
 194 }
 195
 196 /* yay its c */
 197 int mpiece = 0, tpiece, steps = 0, done = 1;
 198 double from[2], to[2];
 199 double dx, dz;
 200 int moving = 0, take = 0, mc = 0, count = 99, wire = 0;
 201 double theta = 0.0;
 202
 203 /** handle X event (trackball) */
 204 Bool chess_handle_event (ModeInfo *mi, XEvent *event) {
 205   Chesscreen *c = &qs[MI_SCREEN(mi)];
 206
 207   if(event->xany.type == ButtonPress && event->xbutton.button == Button1) {
 208     c->button_down_p = True;
 209     gltrackball_start (c->trackball,
 210                        event->xbutton.x, event->xbutton.y,
 211                        MI_WIDTH (mi), MI_HEIGHT (mi));
 212     return True;
 213   }
 214   else if(event->xany.type == ButtonRelease
 215           && event->xbutton.button == Button1) {
 216     c->button_down_p = False;
 217     return True;
 218   }
 219   else if (event->xany.type == ButtonPress &&
 220            (event->xbutton.button == Button4 ||
 221             event->xbutton.button == Button5))
 222     {
 223       gltrackball_mousewheel (c->trackball, event->xbutton.button, 5,
 224                               !event->xbutton.state);
 225       return True;
 226     }
 227   else if(event->xany.type == MotionNotify && c->button_down_p) {
 228     gltrackball_track (c->trackball,
 229                        event->xmotion.x, event->xmotion.y,
 230                        MI_WIDTH (mi), MI_HEIGHT (mi));
 231     return True;
 232   }
 233
 234   return False;
 235 }
 236
 237 GLfloat position[] = { 0.0, 5.0, 5.0, 1.0 };
 238 GLfloat position2[] = { 5.0, 5.0, 5.0, 1.0 };
 239 GLfloat diffuse2[] = {1.0, 1.0, 1.0, 1.0};
 240 GLfloat ambient2[] = {0.7, 0.7, 0.7, 1.0};
 241 GLfloat shininess[] = {60.0};
 242 GLfloat specular[] = {0.4, 0.4, 0.4, 1.0};
 243
 244 /* configure lighting */
 245 void setup_lights(void) {
 246   glEnable(GL_LIGHTING);
 247   glLightfv(GL_LIGHT0, GL_POSITION, position);
 248   glLightfv(GL_LIGHT0, GL_DIFFUSE, diffuse2);
 249   glEnable(GL_LIGHT0);
 250
 251 /*   glLightModelfv(GL_LIGHT_MODEL_AMBIENT, ambient2); */
 252
 253   glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, shininess);
 254   glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, specular);
 255
 256   glLightfv(GL_LIGHT1, GL_SPECULAR, diffuse2);
 257   glLightfv(GL_LIGHT1, GL_DIFFUSE, diffuse2);
 258   glEnable(GL_LIGHT1);
 259 }
 260
 261 /* draw pieces */
 262 void drawPieces(void) {
 263   int i, j;
 264
 265   for(i = 0; i < BOARDSIZE; ++i) {
 266     for(j = 0; j < BOARDSIZE; ++j) {
 267       if(game.board[i][j]) {
 268         int c = game.board[i][j]/PIECES;
 269         glColor3fv(colors[c]);
 270         glCallList(game.board[i][j]%PIECES);
 271       }
 272
 273       glTranslatef(1.0, 0.0, 0.0);
 274     }
 275
 276     glTranslatef(-1.0*BOARDSIZE, 0.0, 1.0);
 277   }
 278
 279   glTranslatef(0.0, 0.0, -1.0*BOARDSIZE);
 280 }
 281
 282 /* draw pieces */
 283 void drawPiecesShadow(void) {
 284   int i, j;
 285
 286   for(i = 0; i < BOARDSIZE; ++i) {
 287     for(j = 0; j < BOARDSIZE; ++j) {
 288       if(game.board[i][j]) {
 289         glColor4f(0.0, 0.0, 0.0, 0.4);
 290         glCallList(game.board[i][j]%PIECES);
 291       }
 292
 293       glTranslatef(1.0, 0.0, 0.0);
 294     }
 295
 296     glTranslatef(-1.0*BOARDSIZE, 0.0, 1.0);
 297   }
 298
 299   glTranslatef(0.0, 0.0, -1.0*BOARDSIZE);
 300 }
 301
 302 /* draw a moving piece */
 303 void drawMovingPiece(int shadow) {
 304   int piece = mpiece % PIECES;
 305
 306   glPushMatrix();
 307
 308   if(shadow) glColor4fv(MaterialShadow);
 309   else glColor3fv(colors[mpiece/PIECES]);
 310
 311   /** assume a queening.  should be more general */
 312   if((mpiece == PAWN  && fabs(to[0]) < 0.01) ||
 313      (mpiece == BPAWN && fabs(to[0]-7.0) < 0.01)) {
 314     glTranslatef(from[1]+steps*dx, 0.0, from[0]+steps*dz);
 315
 316     glColor4f(shadow ? MaterialShadow[0] : colors[mpiece/7][0],
 317               shadow ? MaterialShadow[1] : colors[mpiece/7][1],
 318               shadow ? MaterialShadow[2] : colors[mpiece/7][2],
 319               (fabs(50.0-steps))/50.0);
 320
 321     piece = steps < 50 ? PAWN : QUEEN;
 322
 323     /* what a kludge */
 324     if(steps == 99)
 325       mpiece = mpiece == PAWN ? QUEEN : BQUEEN;
 326   }
 327   else if(mpiece % PIECES == KNIGHT) {
 328     GLfloat shine[1];
 329     GLfloat spec[4];
 330     GLfloat mult;
 331     glTranslatef(steps < 50 ? from[1] : to[1], 0.0,
 332                  steps < 50 ? from[0] : to[0]);
 333
 334     mult = steps < 10
 335       ? (1.0 - steps / 10.0) : 100 - steps < 10
 336       ? (1.0 - (100 - steps) / 10.0) : 0.0;
 337
 338     shine[0] = mult*shininess[0];
 339     spec[0] = mult*specular[0];
 340     spec[1] = mult*specular[1];
 341     spec[2] = mult*specular[2];
 342     spec[3] = 1.0;
 343     glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, shine);
 344     glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, spec);
 345
 346     glColor4f(shadow ? MaterialShadow[0] : colors[mpiece/7][0],
 347               shadow ? MaterialShadow[1] : colors[mpiece/7][1],
 348               shadow ? MaterialShadow[2] : colors[mpiece/7][2],
 349               fabs(49-steps)/49.0);
 350
 351     glScalef(fabs(49-steps)/49.0, fabs(49-steps)/49.0, fabs(49-steps)/49.0);
 352   }
 353   else
 354     glTranslatef(from[1]+steps*dx, 0.0, from[0]+steps*dz);
 355
 356   if(!wire)
 357     glEnable(GL_BLEND);
 358
 359   glCallList(piece);
 360
 361   glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, shininess);
 362   glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, specular);
 363
 364   glPopMatrix();
 365
 366   if(!wire)
 367     glDisable(GL_BLEND);
 368 }
 369
 370 /** code to squish a taken piece */
 371 void drawTakePiece(int shadow) {
 372   if(!wire)
 373     glEnable(GL_BLEND);
 374
 375   glColor4f(shadow ? MaterialShadow[0] : colors[tpiece/7][0],
 376             shadow ? MaterialShadow[1] : colors[tpiece/7][1],
 377             shadow ? MaterialShadow[0] : colors[tpiece/7][2],
 378             (100-1.6*steps)/100.0);
 379
 380   glTranslatef(to[1], 0.0, to[0]);
 381
 382   if(mpiece % PIECES == KNIGHT)
 383     glScalef(1.0+steps/100.0, 1.0, 1.0+steps/100.0);
 384   else
 385     glScalef(1.0, 1 - steps/50.0 > 0.01 ? 1 - steps/50.0 : 0.01, 1.0);
 386   glCallList(tpiece % 7);
 387
 388   if(!wire)
 389     glDisable(GL_BLEND);
 390 }
 391
 392 double mod = 1.4;
 393
 394 /** draw board */
 395 void drawBoard(void) {
 396   int i, j;
 397
 398   glBegin(GL_QUADS);
 399
 400   for(i = 0; i < BOARDSIZE; ++i)
 401     for(j = 0; j < BOARDSIZE; ++j) {
 402       double ma1 = (i+j)%2 == 0 ? mod*i : 0.0;
 403       double mb1 = (i+j)%2 == 0 ? mod*j : 0.0;
 404       double ma2 = (i+j)%2 == 0 ? mod*(i+1.0) : 0.01;
 405       double mb2 = (i+j)%2 == 0 ? mod*(j+1.0) : 0.01;
 406
 407       /*glColor3fv(colors[(i+j)%2]);*/
 408       glColor4f(colors[(i+j)%2][0], colors[(i+j)%2][1],
 409                 colors[(i+j)%2][2], 0.65);
 410
 411       glNormal3f(0.0, 1.0, 0.0);
 412 /*       glTexCoord2f(mod*i, mod*(j+1.0)); */
 413       glTexCoord2f(ma1, mb2);
 414       glVertex3f(i, 0.0, j + 1.0);
 415 /*       glTexCoord2f(mod*(i+1.0), mod*(j+1.0)); */
 416       glTexCoord2f(ma2, mb2);
 417       glVertex3f(i + 1.0, 0.0, j + 1.0);
 418       glTexCoord2f(ma2, mb1);
 419 /*       glTexCoord2f(mod*(i+1.0), mod*j); */
 420       glVertex3f(i + 1.0, 0.0, j);
 421       glTexCoord2f(ma1, mb1);
 422 /*       glTexCoord2f(mod*i, mod*j); */
 423       glVertex3f(i, 0.0, j);
 424     }
 425
 426   /* chop underneath board */
 427 /*   glColor3f(0, 0, 0); */
 428 /*   glNormal3f(0, -1, 0); */
 429 /*   glVertex3f(0,         0,  BOARDSIZE); */
 430 /*   glVertex3f(0,         0,  0); */
 431 /*   glVertex3f(BOARDSIZE, 0,  0); */
 432 /*   glVertex3f(BOARDSIZE, 0,  BOARDSIZE); */
 433   glEnd();
 434 }
 435
 436 void draw_pieces(void) {
 437   glEnable(GL_TEXTURE_2D);
 438   glBindTexture(GL_TEXTURE_2D, piecetexture);
 439   glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
 440
 441   glColor4f(0.5, 0.5, 0.5, 1.0);
 442   glMaterialfv(GL_FRONT_AND_BACK, GL_DIFFUSE, MaterialShadow);
 443
 444   drawPieces();
 445   if(moving) drawMovingPiece(0);
 446   if(take) drawTakePiece(0);
 447   glDisable(GL_TEXTURE_2D);
 448 }
 449
 450 void draw_shadow_pieces(void) {
 451   glEnable(GL_TEXTURE_2D);
 452   glBindTexture(GL_TEXTURE_2D, piecetexture);
 453   glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
 454
 455
 456   drawPiecesShadow();
 457   if(moving) drawMovingPiece(shadows);
 458   if(take) drawTakePiece(shadows);
 459   glDisable(GL_TEXTURE_2D);
 460 }
 461
 462 enum {X, Y, Z, W};
 463 enum {A, B, C, D};
 464
 465 /* create a matrix that will project the desired shadow */
 466 void shadowmatrix(GLfloat shadowMat[4][4],
 467                   GLfloat groundplane[4],
 468                   GLfloat lightpos[4]) {
 469   GLfloat dot;
 470
 471   /* find dot product between light position vector and ground plane normal */
 472   dot = groundplane[X] * lightpos[X] +
 473         groundplane[Y] * lightpos[Y] +
 474         groundplane[Z] * lightpos[Z] +
 475         groundplane[W] * lightpos[W];
 476
 477   shadowMat[0][0] = dot - lightpos[X] * groundplane[X];
 478   shadowMat[1][0] = 0.f - lightpos[X] * groundplane[Y];
 479   shadowMat[2][0] = 0.f - lightpos[X] * groundplane[Z];
 480   shadowMat[3][0] = 0.f - lightpos[X] * groundplane[W];
 481
 482   shadowMat[X][1] = 0.f - lightpos[Y] * groundplane[X];
 483   shadowMat[1][1] = dot - lightpos[Y] * groundplane[Y];
 484   shadowMat[2][1] = 0.f - lightpos[Y] * groundplane[Z];
 485   shadowMat[3][1] = 0.f - lightpos[Y] * groundplane[W];
 486
 487   shadowMat[X][2] = 0.f - lightpos[Z] * groundplane[X];
 488   shadowMat[1][2] = 0.f - lightpos[Z] * groundplane[Y];
 489   shadowMat[2][2] = dot - lightpos[Z] * groundplane[Z];
 490   shadowMat[3][2] = 0.f - lightpos[Z] * groundplane[W];
 491
 492   shadowMat[X][3] = 0.f - lightpos[W] * groundplane[X];
 493   shadowMat[1][3] = 0.f - lightpos[W] * groundplane[Y];
 494   shadowMat[2][3] = 0.f - lightpos[W] * groundplane[Z];
 495   shadowMat[3][3] = dot - lightpos[W] * groundplane[W];
 496 }
 497
 498 GLfloat ground[4] = {0.0, 1.0, 0.0, -0.00001};
 499
 500 /** reflectionboard */
 501 void draw_reflections(void) {
 502   int i, j;
 503
 504   glEnable(GL_STENCIL_TEST);
 505   glStencilFunc(GL_ALWAYS, 1, 1);
 506   glStencilOp(GL_KEEP, GL_KEEP, GL_REPLACE);
 507   glColorMask(0,0,0,0);
 508   glDisable(GL_CULL_FACE);
 509
 510   glDisable(GL_DEPTH_TEST);
 511   glBegin(GL_QUADS);
 512
 513   /* only draw white squares */
 514   for(i = 0; i < BOARDSIZE; ++i) {
 515     for(j = (BOARDSIZE+i) % 2; j < BOARDSIZE; j += 2) {
 516       glVertex3f(i, 0.0, j + 1.0);
 517       glVertex3f(i + 1.0, 0.0, j + 1.0);
 518       glVertex3f(i + 1.0, 0.0, j);
 519       glVertex3f(i, 0.0, j);
 520     }
 521   }
 522   glEnd();
 523   glEnable(GL_DEPTH_TEST);
 524
 525   glColorMask(1, 1, 1, 1);
 526   glStencilFunc(GL_EQUAL, 1, 1);
 527   glStencilOp(GL_KEEP, GL_KEEP, GL_KEEP);
 528
 529   glPushMatrix();
 530   glScalef(1.0, -1.0, 1.0);
 531   glTranslatef(0.5, 0.0, 0.5);
 532
 533   glLightfv(GL_LIGHT0, GL_POSITION, position);
 534   draw_pieces();
 535   glPopMatrix();
 536
 537   glDisable(GL_STENCIL_TEST);
 538   glLightfv(GL_LIGHT0, GL_POSITION, position);
 539
 540   glEnable(GL_CULL_FACE);
 541   glCullFace(GL_BACK);
 542   glColorMask(1,1,1,1);
 543 }
 544
 545 /** draws the scene */
 546 void display(Chesscreen *c) {
 547   glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | GL_STENCIL_BUFFER_BIT);
 548
 549   glMatrixMode(GL_MODELVIEW);
 550   glLoadIdentity();
 551
 552   /** setup perspectif */
 553   glTranslatef(0.0, 0.0, -1.5*BOARDSIZE);
 554   glRotatef(30.0, 1.0, 0.0, 0.0);
 555   gltrackball_rotate (c->trackball);
 556   glRotatef(theta*100, 0.0, 1.0, 0.0);
 557   glTranslatef(-0.5*BOARDSIZE, 0.0, -0.5*BOARDSIZE);
 558
 559   position[0] = 4.0 + 1.0*-sin(theta*100*M_PI/180.0);
 560   position[2] = 4.0 + 1.0*cos(theta*100*M_PI/180.0);
 561   position[1] = 5.0;
 562
 563   position2[0] = 4.0 + 8.0*-sin(theta*100*M_PI/180.0);
 564   position2[2] = 4.0 + 8.0*cos(theta*100*M_PI/180.0);
 565
 566   glEnable(GL_LIGHTING);
 567   glLightfv(GL_LIGHT0, GL_POSITION, position);
 568   glLightfv(GL_LIGHT1, GL_POSITION, position2);
 569   glEnable(GL_LIGHT0);
 570
 571   /** draw board, pieces */
 572   if(!wire) {
 573     glEnable(GL_LIGHTING);
 574     glEnable(GL_COLOR_MATERIAL);
 575
 576     if(reflections) {
 577       draw_reflections();
 578       glEnable(GL_BLEND);
 579     }
 580
 581     glEnable(GL_TEXTURE_2D);
 582     glBindTexture(GL_TEXTURE_2D, boardtexture);
 583     drawBoard();
 584     glDisable(GL_TEXTURE_2D);
 585
 586     if(shadows) {
 587       /* render shadows */
 588       GLfloat m[4][4];
 589       shadowmatrix(m, ground, position);
 590
 591       glMaterialfv(GL_FRONT_AND_BACK, GL_DIFFUSE, MaterialShadow);
 592       glEnable(GL_BLEND);
 593       glDisable(GL_LIGHTING);
 594       glDisable(GL_DEPTH_TEST);
 595
 596       /* display ant shadow */
 597       glPushMatrix();
 598       glTranslatef(0.0, 0.001, 0.0);
 599       glMultMatrixf(m[0]);
 600       glTranslatef(0.5, 0.01, 0.5);
 601       draw_shadow_pieces();
 602       glPopMatrix();
 603
 604       glEnable(GL_LIGHTING);
 605       glDisable(GL_BLEND);
 606       glEnable(GL_DEPTH_TEST);
 607     }
 608
 609     if(reflections)
 610       glDisable(GL_BLEND);
 611   }
 612   else
 613     drawBoard();
 614
 615   glTranslatef(0.5, 0.0, 0.5);
 616   draw_pieces();
 617
 618   if(!wire) {
 619     glDisable(GL_COLOR_MATERIAL);
 620     glDisable(GL_LIGHTING);
 621   }
 622
 623   if (!c->button_down_p)
 624     theta += .002;
 625 }
 626
 627 /** reshape handler */
 628 void reshape_chess(ModeInfo *mi, int width, int height) {
 629   GLfloat h = (GLfloat) height / (GLfloat) width;
 630   glViewport(0,0, width, height);
 631   glMatrixMode(GL_PROJECTION);
 632   glLoadIdentity();
 633   gluPerspective(45, 1/h, 2.0, 30.0);
 634   glMatrixMode(GL_MODELVIEW);
 635 }
 636
 637 /** initialization handler */
 638 void init_chess(ModeInfo *mi) {
 639   Chesscreen *c;
 640   int screen = MI_SCREEN(mi);
 641   wire = MI_IS_WIREFRAME(mi);
 642
 643   if(!qs &&
 644      !(qs = (Chesscreen *) calloc(MI_NUM_SCREENS(mi), sizeof(Chesscreen))))
 645     return;
 646
 647   c = &qs[screen];
 648   c->window = MI_WINDOW(mi);
 649   c->trackball = gltrackball_init ();
 650
 651   if((c->glx_context = init_GL(mi)))
 652     reshape_chess(mi, MI_WIDTH(mi), MI_HEIGHT(mi));
 653   else
 654     MI_CLEARWINDOW(mi);
 655
 656   glClearColor(0.0, 0.0, 0.0, 0.0);
 657
 658   glDepthFunc(GL_LEQUAL);
 659   glClearStencil(0);
 660   glEnable(GL_CULL_FACE);
 661   glCullFace(GL_BACK);
 662
 663   make_piece_texture();
 664   make_board_texture();
 665   gen_model_lists();
 666
 667   if(!wire) {
 668     setup_lights();
 669     glColorMaterial(GL_FRONT, GL_DIFFUSE);
 670     glShadeModel(smooth ? GL_SMOOTH : GL_FLAT);
 671     glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 672     glEnable(GL_DEPTH_TEST);
 673   }
 674   else
 675     glPolygonMode(GL_FRONT, GL_LINE);
 676 }
 677
 678 int oldgame = -1;
 679
 680 /** does dirty work drawing scene, moving pieces */
 681 void draw_chess(ModeInfo *mi) {
 682   Chesscreen *c = &qs[MI_SCREEN(mi)];
 683   Window w = MI_WINDOW(mi);
 684   Display *disp = MI_DISPLAY(mi);
 685
 686   if(!c->glx_context)
 687     return;
 688
 689   glXMakeCurrent(disp, w, *(c->glx_context));
 690
 691   /** code for moving a piece */
 692   if(moving && ++steps == 100) {
 693     moving = count = steps = take = 0;
 694     game.board[game.moves[mc][2]][game.moves[mc][3]] = mpiece;
 695     ++mc;
 696
 697     if(mc == game.movecount) {
 698       done = 1;
 699       mc = 0;
 700     }
 701   }
 702
 703   if(++count == 100) {
 704     if(!done) {
 705       mpiece = game.board[game.moves[mc][0]][game.moves[mc][1]];
 706       game.board[game.moves[mc][0]][game.moves[mc][1]] = NONE;
 707
 708       if((tpiece = game.board[game.moves[mc][2]][game.moves[mc][3]])) {
 709         game.board[game.moves[mc][2]][game.moves[mc][3]] = NONE;
 710         take = 1;
 711       }
 712
 713       from[0] = game.moves[mc][0];
 714       from[1] = game.moves[mc][1];
 715       to[0] = game.moves[mc][2];
 716       to[1] = game.moves[mc][3];
 717
 718       dz = (to[0] - from[0]) / 100;
 719       dx = (to[1] - from[1]) / 100;
 720       steps = 0;
 721       moving = 1;
 722     }
 723     else if(done == 1) {
 724       int newgame = oldgame;
 725       while(newgame == oldgame)
 726         newgame = random()%GAMES;
 727
 728       /* mod the mod */
 729       mod = 0.6 + (random()%20)/10.0;
 730
 731       /* same old game */
 732       oldgame = newgame;
 733       game = games[oldgame];
 734       build_colors();
 735       done = 2;
 736       count = 0;
 737     }
 738     else {
 739       done = 0;
 740       count = 0;
 741     }
 742   }
 743
 744   /* set lighting */
 745   if(done) {
 746     glLightf(GL_LIGHT0, GL_CONSTANT_ATTENUATION,
 747              done == 1 ? 1.0+0.1*count : 100.0/count);
 748     glLightf(GL_LIGHT1, GL_CONSTANT_ATTENUATION,
 749              done == 1 ? 1.0+0.1*count : 100.0/count);
 750     glLightf(GL_LIGHT1, GL_LINEAR_ATTENUATION, 0.14);
 751     glLightf(GL_LIGHT0, GL_LINEAR_ATTENUATION, 0.14);
 752   }
 753
 754   display(c);
 755
 756   if(mi->fps_p) do_fps(mi);
 757   glFinish();
 758   glXSwapBuffers(disp, w);
 759 }
 760
 761 /** bust it */
 762 void release_chess(ModeInfo *mi) {
 763   if(qs)
 764     free((void *) qs);
 765
 766   FreeAllGL(MI);
 767 }
 768
 769 #endif