2002-02-01 19:28:30 +00:00
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
#include <string.h>
|
|
|
|
|
#include "goom_core.h"
|
|
|
|
|
#include "goom_tools.h"
|
|
|
|
|
#include "filters.h"
|
|
|
|
|
#include "lines.h"
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/*#define VERBOSE */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
|
|
|
|
|
#ifdef VERBOSE
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#define STOP_SPEED 128
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/**-----------------------------------------------------**
|
|
|
|
|
** SHARED DATA **
|
|
|
|
|
**-----------------------------------------------------**/
|
|
|
|
|
static guint32 *pixel ;
|
|
|
|
|
static guint32 *back ;
|
|
|
|
|
static guint32 *p1,*p2,*tmp;
|
|
|
|
|
static guint32 cycle;
|
|
|
|
|
|
|
|
|
|
guint32 resolx, resoly, buffsize;
|
|
|
|
|
|
|
|
|
|
void goom_init (guint32 resx, guint32 resy)
|
|
|
|
|
{
|
|
|
|
|
#ifdef VERBOSE
|
|
|
|
|
printf ("GOOM: init (%d, %d);\n", resx,resy);
|
|
|
|
|
#endif
|
|
|
|
|
resolx = resx;
|
|
|
|
|
resoly = resy;
|
|
|
|
|
buffsize = resx * resy;
|
|
|
|
|
|
|
|
|
|
pixel = (guint32 *) malloc (buffsize * sizeof(guint32) + 128);
|
|
|
|
|
back = (guint32 *) malloc (buffsize * sizeof(guint32) + 128);
|
|
|
|
|
RAND_INIT ((guint32)pixel) ;
|
|
|
|
|
cycle = 0 ;
|
|
|
|
|
|
|
|
|
|
p1 = (guint32 *)((1+((unsigned int)(pixel))/128)*128);
|
|
|
|
|
p2 = (guint32 *)((1+((unsigned int)(back))/128)*128);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void goom_set_resolution (guint32 resx, guint32 resy)
|
|
|
|
|
{
|
|
|
|
|
free (pixel);
|
|
|
|
|
free (back);
|
|
|
|
|
|
|
|
|
|
resolx = resx;
|
|
|
|
|
resoly = resy;
|
|
|
|
|
buffsize = resx * resy;
|
|
|
|
|
|
|
|
|
|
pixel = (guint32 *) malloc (buffsize * sizeof(guint32) + 128);
|
|
|
|
|
bzero(pixel,buffsize * sizeof(guint32) + 128);
|
|
|
|
|
back = (guint32 *) malloc (buffsize * sizeof(guint32) + 128);
|
|
|
|
|
bzero(back,buffsize * sizeof(guint32) + 128);
|
|
|
|
|
p1 = (guint32 *)((1+((unsigned int)(pixel))/128)*128);
|
|
|
|
|
p2 = (guint32 *)((1+((unsigned int)(back))/128)*128);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
guint32 * goom_update (gint16 data [2][512])
|
|
|
|
|
{
|
2002-03-19 04:10:05 +00:00
|
|
|
|
static int lockvar = 0 ; /* pour empecher de nouveaux changements */
|
|
|
|
|
static int goomvar = 0 ; /* boucle des gooms */
|
|
|
|
|
static int totalgoom = 0 ; /* nombre de gooms par seconds */
|
|
|
|
|
static int agoom = 0 ; /* un goom a eu lieu.. */
|
|
|
|
|
static int loopvar = 0 ; /* mouvement des points */
|
|
|
|
|
static int speedvar = 0 ; /* vitesse des particules */
|
|
|
|
|
static int lineMode = 0 ; /* l'effet lineaire a dessiner */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
guint32 * return_val;
|
|
|
|
|
guint32 pointWidth;
|
|
|
|
|
guint32 pointHeight;
|
2002-03-19 04:10:05 +00:00
|
|
|
|
int incvar ; /* volume du son */
|
|
|
|
|
int accelvar ; /* acceleration des particules */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
int i ;
|
2002-03-19 04:10:05 +00:00
|
|
|
|
float largfactor ; /* elargissement de l'intervalle d'<27>volution des points */
|
|
|
|
|
static char goomlimit = 2 ; /* sensibilit<69> du goom */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
static ZoomFilterData zfd =
|
|
|
|
|
{
|
|
|
|
|
128, 8, 16,
|
|
|
|
|
1, 1, 0, WAVE_MODE,
|
|
|
|
|
0, 0, 0};
|
|
|
|
|
|
|
|
|
|
ZoomFilterData *pzfd;
|
|
|
|
|
|
|
|
|
|
/* test if the config has changed, update it if so */
|
|
|
|
|
pointWidth = (resolx * 2) / 5;
|
|
|
|
|
pointHeight = (resoly * 2) / 5;
|
|
|
|
|
|
|
|
|
|
/* ! etude du signal ... */
|
|
|
|
|
incvar = 0 ;
|
|
|
|
|
for (i=0;i<512;i++)
|
|
|
|
|
{
|
|
|
|
|
if (incvar < data[0][i]) incvar = data[0][i] ;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
accelvar = incvar / 5000 ;
|
|
|
|
|
if (speedvar>5)
|
|
|
|
|
{
|
|
|
|
|
accelvar-- ;
|
|
|
|
|
if (speedvar>20) accelvar -- ;
|
|
|
|
|
if (speedvar>40) speedvar = 40 ;
|
|
|
|
|
}
|
|
|
|
|
accelvar -- ;
|
|
|
|
|
speedvar += accelvar ;
|
|
|
|
|
|
|
|
|
|
if (speedvar<0) speedvar=0;
|
|
|
|
|
if (speedvar>40) speedvar = 40 ;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* ! calcul du deplacement des petits points ... */
|
|
|
|
|
|
|
|
|
|
largfactor = ((float)speedvar / 40.0f + (float)incvar / 50000.0f) / 1.5f ;
|
|
|
|
|
if (largfactor>1.5f) largfactor = 1.5f ;
|
|
|
|
|
|
|
|
|
|
for (i = 1 ; i*15 <= speedvar + 15; i ++) {
|
|
|
|
|
loopvar += speedvar + 1 ;
|
|
|
|
|
|
|
|
|
|
pointFilter(p1,
|
|
|
|
|
YELLOW,
|
|
|
|
|
((pointWidth - 6.0f) * largfactor + 5.0f),
|
|
|
|
|
((pointHeight - 6.0f) * largfactor + 5.0f),
|
|
|
|
|
i * 152.0f, 128.0f,
|
|
|
|
|
loopvar + i*2032);
|
|
|
|
|
pointFilter(p1, ORANGE,
|
|
|
|
|
((pointWidth / 2) * largfactor) / i + 10.0f * i,
|
|
|
|
|
((pointHeight / 2) * largfactor) / i + 10.0f * i,
|
|
|
|
|
96.0f, i * 80.0f, loopvar / i);
|
|
|
|
|
pointFilter(p1, VIOLET,
|
|
|
|
|
((pointHeight / 3 + 5.0f) * largfactor) / i + 10.0f * i,
|
|
|
|
|
((pointHeight / 3 + 5.0f) * largfactor) / i + 10.0f * i,
|
|
|
|
|
i + 122.0f, 134.0f, loopvar / i);
|
|
|
|
|
pointFilter(p1, BLACK,
|
|
|
|
|
((pointHeight / 3) * largfactor + 20.0f),
|
|
|
|
|
((pointHeight / 3) * largfactor + 20.0f),
|
|
|
|
|
58.0f, i * 66.0f, loopvar / i);
|
|
|
|
|
pointFilter(p1, WHITE,
|
|
|
|
|
(pointHeight * largfactor + 10.0f * i) / i,
|
|
|
|
|
(pointHeight * largfactor + 10.0f * i) / i,
|
|
|
|
|
66.0f, 74.0f, loopvar + i * 500);
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* par d<>faut pas de changement de zoom */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
pzfd = NULL ;
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* diminuer de 1 le temps de lockage */
|
|
|
|
|
/* note pour ceux qui n'ont pas suivis : le lockvar permet d'empecher un */
|
|
|
|
|
/* changement d'etat du plugins juste apres un autre changement d'etat. oki ? */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if (--lockvar < 0) lockvar = 0 ;
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* temps du goom */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if (--agoom < 0) agoom = 0 ;
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* on verifie qu'il ne se pas un truc interressant avec le son. */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if ((accelvar>goomlimit) || (accelvar<-goomlimit))
|
|
|
|
|
{
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* UN GOOM !!! YAHOO ! */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
totalgoom ++ ;
|
2002-03-19 04:10:05 +00:00
|
|
|
|
agoom = 20 ; /* mais pdt 20 cycles, il n'y en aura plus. */
|
|
|
|
|
lineMode = (lineMode + 1)%20; /* Tous les 10 gooms on change de mode lineaire */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* changement eventuel de mode */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
switch (iRAND(10))
|
|
|
|
|
{
|
|
|
|
|
case 0:
|
|
|
|
|
case 1:
|
|
|
|
|
case 2:
|
|
|
|
|
zfd.mode=WAVE_MODE;
|
|
|
|
|
zfd.vitesse=STOP_SPEED-1;
|
|
|
|
|
zfd.reverse=0;
|
|
|
|
|
break;
|
|
|
|
|
case 3:
|
|
|
|
|
case 4:
|
|
|
|
|
zfd.mode=CRYSTAL_BALL_MODE;
|
|
|
|
|
break;
|
|
|
|
|
case 5:
|
|
|
|
|
zfd.mode=AMULETTE_MODE;
|
|
|
|
|
break;
|
|
|
|
|
case 6:
|
|
|
|
|
zfd.mode = WATER_MODE ;
|
|
|
|
|
break;
|
|
|
|
|
case 7:
|
|
|
|
|
zfd.mode=SCRUNCH_MODE;
|
|
|
|
|
break;
|
|
|
|
|
default:
|
|
|
|
|
zfd.mode=NORMAL_MODE;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* tout ceci ne sera fait qu'en cas de non-blocage */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if (lockvar == 0)
|
|
|
|
|
{
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* reperage de goom (acceleration forte de l'acceleration du volume) */
|
|
|
|
|
/* -> coup de boost de la vitesse si besoin.. */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if ( (accelvar>goomlimit) || (accelvar<-goomlimit) )
|
|
|
|
|
{
|
|
|
|
|
goomvar ++ ;
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/*if (goomvar % 1 == 0) */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
{
|
|
|
|
|
guint32 vtmp ;
|
|
|
|
|
guint32 newvit ;
|
|
|
|
|
newvit = STOP_SPEED - speedvar / 2 ;
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* retablir le zoom avant.. */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if ((zfd.reverse) &&
|
|
|
|
|
(!(cycle%12)) &&
|
|
|
|
|
(rand ()%3==0))
|
|
|
|
|
{
|
|
|
|
|
zfd.reverse = 0 ;
|
|
|
|
|
zfd.vitesse = STOP_SPEED - 2 ;
|
|
|
|
|
lockvar = 50 ;
|
|
|
|
|
}
|
|
|
|
|
if (iRAND (10) == 0)
|
|
|
|
|
{
|
|
|
|
|
zfd.reverse = 1;
|
|
|
|
|
lockvar = 100;
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* changement de milieu.. */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
switch (iRAND(20))
|
|
|
|
|
{
|
|
|
|
|
case 0:
|
|
|
|
|
zfd.middleY = resoly - 1 ;
|
|
|
|
|
zfd.middleX = resolx / 2 ;
|
|
|
|
|
break ;
|
|
|
|
|
case 1:
|
|
|
|
|
zfd.middleX = resolx - 1 ;
|
|
|
|
|
break ;
|
|
|
|
|
case 2:
|
|
|
|
|
zfd.middleX = 1 ;
|
|
|
|
|
break ;
|
|
|
|
|
default:
|
|
|
|
|
zfd.middleY = resoly / 2 ;
|
|
|
|
|
zfd.middleX = resolx / 2 ;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (zfd.mode == WATER_MODE)
|
|
|
|
|
{
|
|
|
|
|
zfd.middleX = resolx / 2;
|
|
|
|
|
zfd.middleY = resoly / 2;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
switch (vtmp = (iRAND (27)))
|
|
|
|
|
{
|
|
|
|
|
case 0:
|
2002-04-06 03:40:14 +00:00
|
|
|
|
zfd.vPlaneEffect = iRAND(3);
|
|
|
|
|
zfd.vPlaneEffect -= iRAND(3);
|
|
|
|
|
zfd.hPlaneEffect = iRAND(3);
|
|
|
|
|
zfd.hPlaneEffect -= iRAND(3);
|
2002-02-01 19:28:30 +00:00
|
|
|
|
break;
|
|
|
|
|
case 3:
|
|
|
|
|
zfd.vPlaneEffect = 0 ;
|
2002-04-06 03:40:14 +00:00
|
|
|
|
zfd.hPlaneEffect = iRAND(8);
|
|
|
|
|
zfd.hPlaneEffect -= iRAND(8);
|
2002-02-01 19:28:30 +00:00
|
|
|
|
break;
|
|
|
|
|
case 4:
|
|
|
|
|
case 5:
|
|
|
|
|
case 6:
|
|
|
|
|
case 7:
|
2002-04-06 03:40:14 +00:00
|
|
|
|
zfd.vPlaneEffect = iRAND(5);
|
|
|
|
|
zfd.vPlaneEffect -= iRAND(5);
|
2002-02-01 19:28:30 +00:00
|
|
|
|
zfd.hPlaneEffect = - zfd.vPlaneEffect;
|
|
|
|
|
break;
|
|
|
|
|
case 8:
|
|
|
|
|
zfd.hPlaneEffect = 5 + iRAND (8);
|
|
|
|
|
zfd.vPlaneEffect = - zfd.hPlaneEffect ;
|
|
|
|
|
break;
|
|
|
|
|
case 9:
|
|
|
|
|
zfd.vPlaneEffect = 5 + iRAND (8);
|
|
|
|
|
zfd.hPlaneEffect = - zfd.hPlaneEffect ;
|
|
|
|
|
break;
|
|
|
|
|
case 13:
|
|
|
|
|
zfd.hPlaneEffect = 0;
|
2002-04-06 03:40:14 +00:00
|
|
|
|
zfd.vPlaneEffect = iRAND(10);
|
|
|
|
|
zfd.vPlaneEffect -= iRAND(10);
|
2002-02-01 19:28:30 +00:00
|
|
|
|
break;
|
|
|
|
|
default:
|
|
|
|
|
if (vtmp < 10)
|
|
|
|
|
{
|
|
|
|
|
zfd.vPlaneEffect = 0;
|
|
|
|
|
zfd.hPlaneEffect = 0;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (iRAND (3) != 0) zfd.noisify = 0 ;
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
zfd.noisify = iRAND (3) + 2 ;
|
|
|
|
|
lockvar *= 3;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (zfd.mode == AMULETTE_MODE)
|
|
|
|
|
{
|
|
|
|
|
zfd.vPlaneEffect = 0;
|
|
|
|
|
zfd.hPlaneEffect = 0;
|
|
|
|
|
zfd.noisify = 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if ((zfd.middleX == 1) || (zfd.middleX == resolx - 1))
|
|
|
|
|
{
|
|
|
|
|
zfd.vPlaneEffect = 0 ;
|
|
|
|
|
zfd.hPlaneEffect = iRAND (2) ? 0 : zfd.hPlaneEffect;
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
if (newvit < zfd.vitesse) /* on accelere */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
{
|
|
|
|
|
pzfd = &zfd;
|
|
|
|
|
if ( ( (newvit < STOP_SPEED - 7) &&
|
|
|
|
|
(zfd.vitesse < STOP_SPEED - 6) &&
|
|
|
|
|
(cycle % 3 == 0)) ||
|
|
|
|
|
(iRAND (40) == 0))
|
|
|
|
|
{
|
|
|
|
|
zfd.vitesse = STOP_SPEED - 1 ;
|
|
|
|
|
zfd.reverse = ! zfd.reverse ;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
zfd.vitesse = (newvit + zfd.vitesse * 4) / 5 ;
|
|
|
|
|
}
|
|
|
|
|
lockvar += 50 ;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* mode mega-lent */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if (iRAND(1000) == 0)
|
|
|
|
|
{
|
|
|
|
|
/*
|
|
|
|
|
printf ("coup du sort...\n") ;
|
|
|
|
|
*/
|
|
|
|
|
pzfd = &zfd ;
|
|
|
|
|
zfd.vitesse = STOP_SPEED - 1 ;
|
|
|
|
|
zfd.pertedec = 8 ;
|
|
|
|
|
zfd.sqrtperte = 16 ;
|
|
|
|
|
goomvar = 1 ;
|
|
|
|
|
lockvar += 70 ;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* gros frein si la musique est calme */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if ((speedvar < 1) && (zfd.vitesse < STOP_SPEED - 4) && (cycle % 16 == 0))
|
|
|
|
|
{
|
|
|
|
|
/*
|
|
|
|
|
printf ("++slow part... %i\n", zfd.vitesse) ;
|
|
|
|
|
*/
|
|
|
|
|
pzfd = &zfd ;
|
|
|
|
|
zfd.vitesse += 3 ;
|
|
|
|
|
zfd.pertedec = 8 ;
|
|
|
|
|
zfd.sqrtperte = 16 ;
|
|
|
|
|
goomvar = 0 ;
|
|
|
|
|
/*
|
|
|
|
|
printf ("--slow part... %i\n", zfd.vitesse) ;
|
|
|
|
|
*/
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* baisser regulierement la vitesse... */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if ( (cycle % 73 == 0) && (zfd.vitesse < STOP_SPEED - 5))
|
|
|
|
|
{
|
|
|
|
|
/*
|
|
|
|
|
printf ("slow down...\n") ;
|
|
|
|
|
*/
|
|
|
|
|
pzfd = &zfd ;
|
|
|
|
|
zfd.vitesse ++ ;
|
|
|
|
|
}
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* arreter de decr<63>menter au bout d'un certain temps */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if ((cycle % 101 == 0) && (zfd.pertedec == 7))
|
|
|
|
|
{
|
|
|
|
|
pzfd = &zfd ;
|
|
|
|
|
zfd.pertedec=8 ;
|
|
|
|
|
zfd.sqrtperte=16 ;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef VERBOSE
|
|
|
|
|
if (pzfd)
|
|
|
|
|
{
|
|
|
|
|
printf ("GOOM: pzfd->mode = %d\n", pzfd->mode);
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* Zoom here ! */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
zoomFilterFastRGB (p1, p2, pzfd, resolx, resoly) ;
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* si on est dans un goom : afficher les lignes... */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if (agoom > 15) goom_lines
|
|
|
|
|
(data,
|
|
|
|
|
((zfd.middleX==resolx/2) && (zfd.middleY==resoly/2) && (zfd.mode!=WATER_MODE))
|
|
|
|
|
? (lineMode/10) : 0,
|
|
|
|
|
p2,agoom-15);
|
|
|
|
|
|
|
|
|
|
return_val = p2 ;
|
|
|
|
|
tmp=p1;
|
|
|
|
|
p1=p2;
|
|
|
|
|
p2=tmp;
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* affichage et swappage des buffers.. */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
cycle++;
|
|
|
|
|
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* tous les 100 cycles : v<>rifier si le taux de goom est correct */
|
|
|
|
|
/* et le modifier sinon.. */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
if (!(cycle%100))
|
|
|
|
|
{
|
|
|
|
|
if (totalgoom>15)
|
|
|
|
|
{
|
2002-03-19 04:10:05 +00:00
|
|
|
|
/* printf ("less gooms\n") ; */
|
2002-02-01 19:28:30 +00:00
|
|
|
|
goomlimit ++ ;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
if ((totalgoom==0) && (goomlimit>1))
|
|
|
|
|
goomlimit -- ;
|
|
|
|
|
}
|
|
|
|
|
totalgoom = 0 ;
|
|
|
|
|
}
|
|
|
|
|
return return_val;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void goom_close ()
|
|
|
|
|
{
|
|
|
|
|
if (pixel!=NULL) free (pixel) ;
|
|
|
|
|
if (back!=NULL) free (back) ;
|
|
|
|
|
pixel = back = NULL;
|
|
|
|
|
RAND_CLOSE();
|
|
|
|
|
}
|