summaryrefslogtreecommitdiffstats
path: root/hacks/glx/sproingies.c
diff options
context:
space:
mode:
Diffstat (limited to 'hacks/glx/sproingies.c')
-rw-r--r--hacks/glx/sproingies.c902
1 files changed, 0 insertions, 902 deletions
diff --git a/hacks/glx/sproingies.c b/hacks/glx/sproingies.c
deleted file mode 100644
index bfe4f4a..0000000
--- a/hacks/glx/sproingies.c
+++ /dev/null
@@ -1,902 +0,0 @@
-/* -*- Mode: C; tab-width: 4 -*- */
-/* sproingies.c - 3D sproingies */
-
-#if 0
-static const char sccsid[] = "@(#)sproingies.c 4.04 97/07/28 xlockmore";
-#endif
-
-/*-
- * sproingies.c - Copyright 1996 by Ed Mackey, freely distributable.
- *
- * Permission to use, copy, modify, and distribute this software and its
- * documentation for any purpose and without fee is hereby granted,
- * provided that the above copyright notice appear in all copies and that
- * both that copyright notice and this permission notice appear in
- * supporting documentation.
- *
- * This file is provided AS IS with no warranties of any kind. The author
- * shall have no liability with respect to the infringement of copyrights,
- * trade secrets or any patents by this file or any part thereof. In no
- * event will the author be liable for any lost revenue or profits or
- * other special, indirect and consequential damages.
- *
- * Revision History:
- * See sproingiewrap.c
- */
-
-#ifdef STANDALONE
-# include "screenhackI.h" /* from the xscreensaver distribution */
-#else /* !STANDALONE */
-# include "xlock.h" /* from the xlockmore distribution */
-#endif /* !STANDALONE */
-
-#ifdef USE_GL
-
-#if !defined(HAVE_JWZGLES) && !defined(HAVE_COCOA)
-# include <GL/glu.h>
-#endif
-
-#include "gllist.h"
-#include "sproingies.h"
-
-#define MAXSPROING 100
-#define TARGET_COUNT 40
-#define BOOM_FRAME 50
-#define NO_FRAME (-10)
-#define RESET_SPROINGIE_LIFE (-30 + myrand(28))
-#define NEW_SPROINGIE_LIFE (40 + myrand(200))
-#define JUMP_LEFT 0
-#define JUMP_RIGHT 1
-
-#define FIRST_FRAME 0
-#define LAST_FRAME 5
-/*-
- * The sproingies have six "real" frames, (s1_1 to s1_6) that show a
- * sproingie jumping off a block, headed down and to the right.
- * The frames are numbered from 0 (FIRST_FRAME) to 5 (LAST_FRAME).
- *
- * There are other frame numbers for special cases (e.g. BOOM_FRAME).
- */
-
-extern const struct gllist *s1_1;
-extern const struct gllist *s1_2;
-extern const struct gllist *s1_3;
-extern const struct gllist *s1_4;
-extern const struct gllist *s1_5;
-extern const struct gllist *s1_6;
-extern const struct gllist *s1_b;
-
-static int
-myrand(int range)
-{
- return ((int) (((float) range) * LRAND() / (MAXRAND)));
-}
-
-static int smart_sproingies = 0;
-
-static GLuint
-build_TopsSides(int wireframe)
-{
- GLuint dl_num;
- GLfloat mat_color[4] =
- {0.0, 0.0, 0.0, 1.0};
-
- dl_num = glGenLists(2);
- if (!dl_num)
- return (0); /* 0 means out of display lists. */
-
- /* Surface: Tops */
- glNewList(dl_num, GL_COMPILE);
- mat_color[0] = 0.392157;
- mat_color[1] = 0.784314;
- mat_color[2] = 0.941176;
- if (wireframe)
- glColor3fv(mat_color);
- else {
- glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, mat_color);
- }
- glEndList();
-
- /* Surface: Sides */
- glNewList(dl_num + 1, GL_COMPILE);
- if (wireframe)
- glColor3fv(mat_color);
- else {
- /* jwz: in wireframe mode, color tops and sides the same. */
- mat_color[0] = 0.156863;
- mat_color[1] = 0.156863;
- mat_color[2] = 0.392157;
- glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, mat_color);
- }
- glEndList();
- return (dl_num);
-}
-
-static void
-LayGround(int sx, int sy, int sz, int width, int height, sp_instance * si)
-{
- int x, y, z, w, h;
- GLenum begin_polygon;
-
- if (si->wireframe)
- begin_polygon = GL_LINE_LOOP;
- else
- begin_polygon = GL_POLYGON;
-
- if (!si->wireframe) {
- if (!si->mono)
- glCallList(si->TopsSides); /* Render the tops */
- glNormal3f(0.0, 1.0, 0.0);
-
- for (h = 0; h < height; ++h) {
- x = sx + h;
- y = sy - (h << 1);
- z = sz + h;
- for (w = 0; w < width; ++w) {
- glBegin(begin_polygon);
- glVertex3i(x, y, z);
- glVertex3i(x, y, z - 1);
- glVertex3i(x + 1, y, z - 1);
- glVertex3i(x + 1, y, z);
- glEnd();
- glBegin(begin_polygon);
- glVertex3i(x + 1, y - 1, z);
- glVertex3i(x + 1, y - 1, z - 1);
- glVertex3i(x + 2, y - 1, z - 1);
- glVertex3i(x + 2, y - 1, z);
- glEnd();
- ++x;
- --z;
- }
- }
- }
- if (!si->mono)
- glCallList(si->TopsSides + 1); /* Render the sides */
- if (!si->wireframe)
- glNormal3f(0.0, 0.0, 1.0);
-
- for (h = 0; h < height; ++h) {
- x = sx + h;
- y = sy - (h << 1);
- z = sz + h;
- for (w = 0; w < width; ++w) {
- glBegin(begin_polygon);
- glVertex3i(x, y, z);
- glVertex3i(x + 1, y, z);
- glVertex3i(x + 1, y - 1, z);
- glVertex3i(x, y - 1, z);
- glEnd();
- glBegin(begin_polygon);
- glVertex3i(x + 1, y - 1, z);
- glVertex3i(x + 2, y - 1, z);
- glVertex3i(x + 2, y - 2, z);
- glVertex3i(x + 1, y - 2, z);
-/*-
- * PURIFY 4.0.1 reports an unitialized memory read on the next line when using
- * MesaGL 2.2 and -mono. This has been fixed in MesaGL 2.3 and later. */
- glEnd();
- ++x;
- --z;
- }
- }
-
- /* Render the other sides */
- if (!si->wireframe)
- glNormal3f(1.0, 0.0, 0.0);
-
- for (h = 0; h < height; ++h) {
- x = sx + h;
- y = sy - (h << 1);
- z = sz + h;
- for (w = 0; w < width; ++w) {
- glBegin(begin_polygon);
- glVertex3i(x + 1, y, z);
- glVertex3i(x + 1, y, z - 1);
- glVertex3i(x + 1, y - 1, z - 1);
- glVertex3i(x + 1, y - 1, z);
- glEnd();
- glBegin(begin_polygon);
- glVertex3i(x + 2, y - 1, z);
- glVertex3i(x + 2, y - 1, z - 1);
- glVertex3i(x + 2, y - 2, z - 1);
- glVertex3i(x + 2, y - 2, z);
- glEnd();
- ++x;
- --z;
- }
- }
-
- if (si->wireframe) {
- if (!si->mono)
- glCallList(si->TopsSides); /* Render the tops */
-
- for (h = 0; h < height; ++h) {
- x = sx + h;
- y = sy - (h << 1);
- z = sz + h;
- for (w = 0; w < width; ++w) {
- glBegin(begin_polygon);
- glVertex3i(x, y, z);
- glVertex3i(x, y, z - 1);
- glVertex3i(x + 1, y, z - 1);
- glVertex3i(x + 1, y, z);
- glEnd();
- glBegin(begin_polygon);
- glVertex3i(x + 1, y - 1, z);
- glVertex3i(x + 1, y - 1, z - 1);
- glVertex3i(x + 2, y - 1, z - 1);
- glVertex3i(x + 2, y - 1, z);
- glEnd();
- ++x;
- --z;
- }
- }
- }
-}
-
-static void
-AdvanceSproingie(int t, sp_instance * si)
-{
- int g_higher, g_back, t2;
- struct sPosColor *thisSproingie = &(si->positions[t]);
- struct sPosColor *S2 = &(si->positions[0]);
-
- if (thisSproingie->life > 0) {
- if ((++(thisSproingie->frame)) > LAST_FRAME) {
- if (thisSproingie->frame >= BOOM_FRAME) {
- if ((thisSproingie->r -= 0.08) < 0.0)
- thisSproingie->r = 0.0;
- if ((thisSproingie->g -= 0.08) < 0.0)
- thisSproingie->g = 0.0;
- if ((thisSproingie->b -= 0.08) < 0.0)
- thisSproingie->b = 0.0;
- if ((--(thisSproingie->life)) < 1) {
- thisSproingie->life = RESET_SPROINGIE_LIFE;
- }
- return;
- }
- thisSproingie->frame = FIRST_FRAME;
-
- /* Check for collisions */
- for (t2 = 0; t2 < si->maxsproingies; ++t2) {
- if ((t2 != t) && (thisSproingie->x == S2->x) &&
- (thisSproingie->y == S2->y) && (thisSproingie->z == S2->z) &&
- (S2->life > 10) && (S2->frame < LAST_FRAME + 1)) {
-#if 0
- if (thisSproingie->life > S2->life) {
- S2->life = 10;
- } else {
-#endif
- if (thisSproingie->life > 10) {
- thisSproingie->life = 10;
- thisSproingie->frame = BOOM_FRAME;
- if ((thisSproingie->r += 0.5) > 1.0)
- thisSproingie->r = 1.0;
- if ((thisSproingie->g += 0.5) > 1.0)
- thisSproingie->g = 1.0;
- if ((thisSproingie->b += 0.5) > 1.0)
- thisSproingie->b = 1.0;
- }
-#if 0
- }
-#endif
- }
- ++S2;
- }
- }
- /* Time to disappear... */
- if (!((thisSproingie->life == 10) &&
- (thisSproingie->frame > FIRST_FRAME) &&
- (thisSproingie->frame < BOOM_FRAME))) {
- if ((--(thisSproingie->life)) < 1) {
- thisSproingie->life = RESET_SPROINGIE_LIFE;
- } else if (thisSproingie->life < 9) {
- thisSproingie->frame -= 2;
- }
- } /* ... else wait here for frame FIRST_FRAME to come about. */
- } else if (++(thisSproingie->life) >= 0) {
- if (1 || t > 1) {
- g_higher = -3 + myrand(5);
- g_back = -2 + myrand(5);
- } else if (t == 1) {
- g_higher = -2 + myrand(3);
- g_back = -1 + myrand(3);
- } else {
- g_higher = -1;
- g_back = 0;
- }
-
- thisSproingie->x = (-g_higher - g_back);
- thisSproingie->y = (g_higher << 1);
- thisSproingie->z = (g_back - g_higher);
- thisSproingie->life = NEW_SPROINGIE_LIFE;
- thisSproingie->frame = NO_FRAME;
- thisSproingie->r = (GLfloat) (40 + myrand(200)) / 255.0;
- thisSproingie->g = (GLfloat) (40 + myrand(200)) / 255.0;
- thisSproingie->b = (GLfloat) (40 + myrand(200)) / 255.0;
-
- for (t2 = 0; t2 < si->maxsproingies; ++t2) {
- if ((t2 != t) && (thisSproingie->x == S2->x) &&
- (thisSproingie->y == S2->y) && (thisSproingie->z == S2->z) &&
- (S2->life > 10) && (S2->frame < FIRST_FRAME)) {
- /* If another is already on this place, wait. */
- thisSproingie->life = -1;
- }
- ++S2;
- }
- }
-}
-
-static void
-NextSproingie(sp_instance *si)
-{
- int ddx, t;
- struct sPosColor *thisSproingie = &(si->positions[0]);
-
- /* Although the sproingies cycle has six frames, the blocks cycle */
- /* has twelve. After a full cycle (12 frames), re-center positions */
- /* of sproingies */
- if (++si->sframe > 11) {
- si->sframe = FIRST_FRAME;
- for (t = 0; t < si->maxsproingies; ++t) {
- thisSproingie->x -= 1;
- thisSproingie->y += 2;
- thisSproingie->z -= 1;
- ++thisSproingie;
- }
- }
-
- for (t = 0; t < si->maxsproingies; ++t) {
- AdvanceSproingie(t, si);
- }
-
- if (si->target_count < 0) { /* track to current target */
- if (si->target_rx < si->rotx)
- --si->rotx;
- else if (si->target_rx > si->rotx)
- ++si->rotx;
-
- if (si->target_ry < si->roty)
- --si->roty;
- else if (si->target_ry > si->roty)
- ++si->roty;
-
- ddx = (si->target_dist - si->dist) / 8;
- if (ddx)
- si->dist += ddx;
- else if (si->target_dist < si->dist)
- --si->dist;
- else if (si->target_dist > si->dist)
- ++si->dist;
-
- if ((si->target_rx == si->rotx) && (si->target_ry == si->roty) &&
- (si->target_dist == si->dist)) {
- si->target_count = TARGET_COUNT;
- if (si->target_dist <= 32)
- si->target_count >>= 2;
- }
- } else if (--si->target_count < 0) { /* make up new target */
- si->target_rx = myrand(100) - 35;
- si->target_ry = -myrand(90);
- si->target_dist = 32 << myrand(2); /* could be 32, 64, or 128, (previously or 256) */
-
- if (si->target_dist >= si->dist) /* no duplicate distances */
- si->target_dist <<= 1;
- }
- /* Otherwise just hang loose for a while here */
-}
-
-#ifdef __AUXFUNCS__
-void
-PrintEm(void)
-{
- int t, count = 0;
-
- for (t = 0; t < maxsproingies; ++t) {
- if (positions[t].life > 0)
- ++count;
- }
- (void) printf("RotX: %d, RotY: %d, Dist: %d. Targets: X %d, Y %d, D %d. Visible: %d\n",
- rotx, roty, dist, target_rx, target_ry, target_dist, count);
-}
-
-void
-ResetEm(void)
-{
- int t;
-
- for (t = 0; t < maxsproingies; ++t) {
- positions[t].x = 0;
- positions[t].y = 0;
- positions[t].z = 0;
- positions[t].life = -2;
- positions[t].frame = FIRST_FRAME;
- }
-}
-
-void
-distAdd(void)
-{
- if (dist < (1 << 16 << 4))
- dist <<= 1;
-}
-
-void
-distSubtract(void)
-{
- if (dist > 1)
- dist >>= 1;
-}
-
-void
-rotxAdd(void)
-{
- rotx = (rotx + 5) % 360;
-}
-
-void
-rotxSubtract(void)
-{
- rotx = (rotx - 5) % 360;
-}
-
-void
-rotyAdd(void)
-{
- roty = (roty + 5) % 360;
-}
-
-void
-rotySubtract(void)
-{
- roty = (roty - 5) % 360;
-}
-
-void
-rotxBAdd(void)
-{
- rotx = (rotx + 45) % 360;
-}
-
-void
-rotxBSubtract(void)
-{
- rotx = (rotx - 45) % 360;
-}
-
-void
-rotyBAdd(void)
-{
- roty = (roty + 45) % 360;
-}
-
-void
-rotyBSubtract(void)
-{
- roty = (roty - 45) % 360;
-}
-
-#endif /* __AUXFUNCS__ */
-
-static void
-RenderSproingie(int t, sp_instance * si)
-{
- GLfloat scale, pointsize, mat_color[4] =
- {0.0, 0.0, 0.0, 1.0};
-#ifndef HAVE_JWZGLES
- GLdouble clipplane[4] =
- {0.0, 1.0, 0.0, 0.0};
-#endif
- struct sPosColor *thisSproingie = &(si->positions[t]);
-
- if (thisSproingie->life < 1)
- return;
-
- glPushMatrix();
-
- if (!si->mono) {
- mat_color[0] = thisSproingie->r;
- mat_color[1] = thisSproingie->g;
- mat_color[2] = thisSproingie->b;
- if (si->wireframe)
- glColor3fv(mat_color);
- else {
- glMaterialfv(GL_FRONT, GL_AMBIENT_AND_DIFFUSE, mat_color);
- }
- }
-
- if (thisSproingie->frame < FIRST_FRAME) {
- glEnable(GL_CLIP_PLANE0);
- glTranslatef((GLfloat) (thisSproingie->x),
- (GLfloat) (thisSproingie->y) +
- ((GLfloat) (thisSproingie->frame) / 9.0),
- (GLfloat) (thisSproingie->z));
-
-#ifndef HAVE_JWZGLES
- /* OpenGLES doesn't have this but it doesn't seem to matter */
- clipplane[3] = ((GLdouble) (thisSproingie->frame) / 9.0) +
- (si->wireframe ? 0.0 : 0.1);
- glClipPlane(GL_CLIP_PLANE0, clipplane);
-#endif
-
-/** glCallList(si->sproingies[0]);*/
-/**/ renderList(si->sproingies[0], si->wireframe);
- glDisable(GL_CLIP_PLANE0);
- } else if (thisSproingie->frame >= BOOM_FRAME) {
- glTranslatef((GLfloat) (thisSproingie->x) + 0.5,
- (GLfloat) (thisSproingie->y) + 0.5,
- (GLfloat) (thisSproingie->z) - 0.5);
- {
- int boom_scale = thisSproingie->frame - BOOM_FRAME;
- if (boom_scale >= 31) boom_scale = 31;
- scale = (GLfloat) (1 << boom_scale);
- }
- glScalef(scale, scale, scale);
- if (!si->wireframe) {
- if (!si->mono)
- glColor3fv(mat_color);
- glDisable(GL_LIGHTING);
- }
- pointsize = (GLfloat) ((BOOM_FRAME + 8) - thisSproingie->frame) -
- (si->dist / 64.0);
- glPointSize((pointsize < 1.0) ? 1.0 : pointsize);
-/*-
- * PURIFY 4.0.1 reports an unitialized memory read on the next line when using
- * MesaGL 2.2. This has been tracked to MesaGL 2.2 src/points.c line 313. */
-/** glCallList(si->SproingieBoom);*/
-/**/ renderList(si->SproingieBoom, si->wireframe);
- glPointSize(1.0);
- if (!si->wireframe) {
- glEnable(GL_LIGHTING);
- }
- } else {
- if (thisSproingie->direction == JUMP_LEFT) {
- /* When the sproingie jumps to the left, the frames must be */
- /* rotated and translated */
- glTranslatef((GLfloat) (thisSproingie->x ),
- (GLfloat) (thisSproingie->y ),
- (GLfloat) (thisSproingie->z - 1));
- glRotatef((GLfloat) - 90.0, 0.0, 1.0, 0.0);
- if (thisSproingie->frame == LAST_FRAME) {
- thisSproingie->x -= 0;
- thisSproingie->y -= 1;
- thisSproingie->z += 1;
- }
- } else {
- glTranslatef((GLfloat) (thisSproingie->x),
- (GLfloat) (thisSproingie->y),
- (GLfloat) (thisSproingie->z));
- glRotatef((GLfloat) - 0.0, 0.0, 1.0, 0.0);
- if (thisSproingie->frame == LAST_FRAME) {
- thisSproingie->x += 1;
- thisSproingie->y -= 1;
- thisSproingie->z -= 0;
- }
- }
-/* } */
-/** glCallList(si->sproingies[thisSproingie->frame]);*/
-/**/ renderList(si->sproingies[thisSproingie->frame], si->wireframe);
-
- /* Every 6 frame cycle... */
- if (thisSproingie->frame == LAST_FRAME) {
- /* ...check if the sproingies have gone out of the bricks */
- if (((thisSproingie->x - thisSproingie->z == 6) &&
- (2*thisSproingie->x + thisSproingie->y == 6)) ||
- ((thisSproingie->z - thisSproingie->x == 5) &&
- (2*thisSproingie->x + thisSproingie->y == -5))) {
- /* If they have, then they die */
- if (thisSproingie->life > 0 && thisSproingie->frame < BOOM_FRAME && thisSproingie->frame > FIRST_FRAME) {
- thisSproingie->frame = BOOM_FRAME;
- }
- } else {
- /* If not, they choose a direction for the next hop */
- if (smart_sproingies) {
- if ((thisSproingie->x - thisSproingie->z == 5) &&
- (2*thisSproingie->x + thisSproingie->y == 5)) {
- thisSproingie->direction = JUMP_LEFT;
- } else if ((thisSproingie->z - thisSproingie->x == 4) &&
- (2*thisSproingie->x + thisSproingie->y == -4)) {
- thisSproingie->direction = JUMP_RIGHT;
- } else {
- thisSproingie->direction = myrand(2);
- }
- } else {
- thisSproingie->direction = myrand(2);
- }
- }
- }
- }
-
- glPopMatrix();
-
-}
-
-static void
-ComputeGround(sp_instance * si)
-{
- int g_higher, g_back, g_width, g_height;
-
- /* higher: x-1, y+2, z-1 */
- /* back: x-1, y, z+1 */
-
- if (si->groundlevel == 0) {
- g_back = 2;
- g_width = 5;
- } else if (si->groundlevel == 1) {
- g_back = 4;
- g_width = 8;
- } else {
- g_back = 8;
- g_width = 16;
- }
-
- if ((g_higher = si->dist >> 3) < 4)
- g_higher = 4;
- if (g_higher > 16)
- g_higher = 16;
- g_height = g_higher << 1;
-
- if (si->rotx < -10)
- g_higher += (g_higher >> 2);
- else if (si->rotx > 10)
- g_higher -= (g_higher >> 2);
-
-#if 0
- if (si->dist > 128) {
- ++g_higher;
- ++g_back;
- g_back <<= 1;
- } else if (si->dist > 64) {
- ++g_higher;
- ++g_back;
- } else if (si->dist > 32) {
- /* nothing special */
- } else {
- if (g_higher > 2) {
- g_higher = g_back = 4;
- }
- }
-#endif
-
- /* startx, starty, startz, width, height */
- LayGround((-g_higher - g_back), (g_higher << 1), (g_back - g_higher),
- (g_width), (g_height), si);
-}
-
-void
-DisplaySproingies(sp_instance *si)
-{
- int t;
- GLfloat position[] =
- {8.0, 5.0, -2.0, 0.1};
-
- if (si->wireframe)
- glClear(GL_COLOR_BUFFER_BIT);
- else
- glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
-
- glPushMatrix();
- glTranslatef(0.0, 0.0, -(GLfloat) (si->dist) / 16.0); /* viewing transform */
- glRotatef((GLfloat) si->rotx, 1.0, 0.0, 0.0);
- glRotatef((GLfloat) si->roty, 0.0, 1.0, 0.0);
-
- if (!si->wireframe)
- glLightfv(GL_LIGHT0, GL_POSITION, position);
-
-#if 0 /* Show light pos */
- glPushMatrix();
- glTranslatef(position[0], position[1], position[2]);
- glColor3f(1.0, 1.0, 1.0);
- if (!si->wireframe) {
- glDisable(GL_LIGHTING);
- }
- glCallList(si->SproingieBoom);
- if (!si->wireframe) {
- glEnable(GL_LIGHTING);
- }
- glPopMatrix();
-#endif
-
- glTranslatef((GLfloat) si->sframe * (-1.0 / 12.0) - 0.75,
- (GLfloat) si->sframe * (2.0 / 12.0) - 0.5,
- (GLfloat) si->sframe * (-1.0 / 12.0) + 0.75);
-
- if (si->wireframe)
- ComputeGround(si);
-
- for (t = 0; t < si->maxsproingies; ++t) {
- RenderSproingie(t, si);
- }
-
- if (!si->wireframe)
- ComputeGround(si);
-
- glPopMatrix();
- glFlush();
-}
-
-void
-NextSproingieDisplay(sp_instance *si)
-{
- NextSproingie(si);
-/* if (pause) usleep(pause); don't do this! -jwz */
- DisplaySproingies(si);
-}
-
-void
-ReshapeSproingies(int width, int height)
-{
- double h = (GLfloat) height / (GLfloat) width;
- int y = 0;
-
- if (width > height * 5) { /* tiny window: show middle */
- height = width * 9/16;
- y = -height/2;
- h = height / (GLfloat) width;
- }
-
- glViewport(0, y, width, height);
- glMatrixMode(GL_PROJECTION);
- glLoadIdentity();
- gluPerspective(65.0, 1/h, 0.1, 2000.0); /* was 200000.0 */
- glMatrixMode(GL_MODELVIEW);
- glLoadIdentity();
-}
-
-void
-CleanupSproingies(sp_instance *si)
-{
- if (! si) return;
-
-/*
- int t;
- if (si->SproingieBoom) {
- for (t = 0; t < 6; ++t)
- glDeleteLists(si->sproingies[t], 1);
-
- glDeleteLists(si->TopsSides, 2);
- glDeleteLists(si->SproingieBoom, 1);
-
- si->SproingieBoom = 0;
- }
-*/
- if (si->TopsSides) {
- glDeleteLists(si->TopsSides, 2);
- }
- if (si->positions) {
- free((si->positions));
- si->positions = NULL;
- }
-}
-
-void
-InitSproingies(sp_instance *si, int wfmode, int grnd, int mspr, int smrtspr,
- int mono)
-{
- GLfloat ambient[] =
- {0.2, 0.2, 0.2, 1.0};
- GLfloat position[] =
- {10.0, 1.0, 1.0, 10.0};
- GLfloat mat_diffuse[] =
- {0.6, 0.6, 0.6, 1.0};
- GLfloat mat_specular[] =
- {0.8, 0.8, 0.8, 1.0};
- GLfloat mat_shininess[] =
- {50.0};
-
- int t;
-
- memset (si, 0, sizeof(*si));
-
- if (mspr < 0)
- mspr = 0;
- if (mspr >= MAXSPROING)
- mspr = MAXSPROING - 1;
-
- smart_sproingies = smrtspr;
-
- si->rotx = 0;
- si->roty = -45;
- si->dist = (16 << 2);
- si->sframe = 0;
- si->target_count = 0;
- si->mono = mono;
-
- si->wireframe = si->flatshade = 0;
-
- if (wfmode == 2)
- si->flatshade = 1;
- else if (wfmode)
- si->wireframe = 1;
-
- si->groundlevel = grnd;
- si->maxsproingies = mspr;
-
- if (si->maxsproingies) {
- si->positions = (struct sPosColor *) calloc(si->maxsproingies,
- sizeof (struct sPosColor));
-
- if (!(si->positions))
- si->maxsproingies = 0;
- }
- for (t = 0; t < si->maxsproingies; ++t) {
- si->positions[t].x = 0;
- si->positions[t].y = 0;
- si->positions[t].z = 0;
- si->positions[t].life = (-t * ((si->maxsproingies > 19) ? 1 : 4)) - 2;
- si->positions[t].frame = FIRST_FRAME;
- si->positions[t].direction = myrand(2);
- }
-
-#if 0 /* Test boom */
- si->positions[0].x = 0;
- si->positions[0].y = 0;
- si->positions[0].z = 0;
- si->positions[0].life = 10;
- si->positions[0].frame = BOOM_FRAME;
- si->positions[0].r = 0.656863;
- si->positions[0].g = 1.0;
- si->positions[0].b = 0.656863;
-#endif
-
- if (!(si->TopsSides = build_TopsSides(si->wireframe)))
- (void) fprintf(stderr, "build_TopsSides\n");
-/*
- if (!(si->sproingies[0] = BuildLWO(si->wireframe, &LWO_s1_1)))
- (void) fprintf(stderr, "BuildLWO - 1\n");
- if (!(si->sproingies[1] = BuildLWO(si->wireframe, &LWO_s1_2)))
- (void) fprintf(stderr, "BuildLWO - 2\n");
- if (!(si->sproingies[2] = BuildLWO(si->wireframe, &LWO_s1_3)))
- (void) fprintf(stderr, "BuildLWO - 3\n");
- if (!(si->sproingies[3] = BuildLWO(si->wireframe, &LWO_s1_4)))
- (void) fprintf(stderr, "BuildLWO - 4\n");
- if (!(si->sproingies[4] = BuildLWO(si->wireframe, &LWO_s1_5)))
- (void) fprintf(stderr, "BuildLWO - 5\n");
- if (!(si->sproingies[5] = BuildLWO(si->wireframe, &LWO_s1_6)))
- (void) fprintf(stderr, "BuildLWO - 6\n");
-
- if (!(si->SproingieBoom = BuildLWO(si->wireframe, &LWO_s1_b)))
- (void) fprintf(stderr, "BuildLWO - b\n");
-*/
- si->sproingies[0]=s1_1;
- si->sproingies[1]=s1_2;
- si->sproingies[2]=s1_3;
- si->sproingies[3]=s1_4;
- si->sproingies[4]=s1_5;
- si->sproingies[5]=s1_6;
- si->SproingieBoom=s1_b;
-
- if (si->wireframe) {
- glShadeModel(GL_FLAT);
- glDisable(GL_LIGHTING);
- } else {
- if (si->flatshade) {
- glShadeModel(GL_FLAT);
- position[0] = 1.0;
- position[3] = 0.0;
- }
- glEnable(GL_LIGHTING);
- glEnable(GL_LIGHT0);
- glDepthFunc(GL_LEQUAL);
- glEnable(GL_DEPTH_TEST);
-
- glLightfv(GL_LIGHT0, GL_AMBIENT, ambient);
- glLightfv(GL_LIGHT0, GL_POSITION, position);
-
- glMaterialfv(GL_FRONT_AND_BACK, GL_DIFFUSE, mat_diffuse);
- glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, mat_specular);
- glMaterialfv(GL_FRONT_AND_BACK, GL_SHININESS, mat_shininess);
-
- /* glLightModeli(GL_LIGHT_MODEL_TWO_SIDE, GL_FALSE); */
- glCullFace(GL_BACK);
- glEnable(GL_CULL_FACE);
-
- glFrontFace(GL_CW);
- /* glEnable(GL_NORMALIZE); */
- }
-}
-
-#endif /* USE_GL */
-
-/* End of sproingies.c */
-
generated by cgit v1.2.3-55-g7522 (git 2.39.0) at 2026-03-09 14:37:55 +0100