You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdeartwork/kscreensaver/xsavers/swarm.cpp

420 lines
10 KiB

/*-
* swarm.c - swarm of bees for xlock, the X Window System lockscreen.
*
* Copyright (c) 1991 by Patrick J. Naughton.
*
* Revision History:
* 31-Aug-90: Adapted from xswarm by Jeff Butterworth. (butterwo@ncsc.org)
*/
/* Ported to kscreensaver:
July 1997, Emanuel Pirker <epirker@edu.uni-klu.ac.at>
Contact me in case of problems, not the original author!
Last revised: 10-Jul-97
*/
// layout management added 1998/04/19 by Mario Weilguni <mweilguni@kde.org>
#define MAXSPEED 100
#define MINSPEED 0
#define DEFSPEED 50
#define MAXBATCH 200
#define MINBATCH 0
#define DEFBATCH 20
#include <tqslider.h>
#include <kglobal.h>
#include <kconfig.h>
#include <krandomsequence.h>
#include "xlock.h"
#undef index
#define TIMES 4 /* number of time positions recorded */
#define BEEACC 2 /* acceleration of bees */
#define WASPACC 5 /* maximum acceleration of wasp */
#define BEEVEL 12 /* maximum bee velocity */
#define WASPVEL 10 /* maximum wasp velocity */
/* Macros */
#define X(t,b) (sp->x[(t)*sp->beecount+(b)])
#define Y(t,b) (sp->y[(t)*sp->beecount+(b)])
#define balance_rand(v) (rnd.getLong(v)-((v)/2)) /* random number around 0 */
//ModeSpecOpt swarm_opts = {0, NULL, NULL, NULL};
typedef struct {
int pix;
int width;
int height;
int border; /* wasp won't go closer than this to the edge */
int beecount; /* number of bees */
XSegment segs[MAXBATCH]; /* bee lines */
XSegment old_segs[MAXBATCH]; /* old bee lines */
short x[MAXBATCH*TIMES];
short y[MAXBATCH*TIMES]; /* bee positions x[time][bee#] */
short xv[MAXBATCH];
short yv[MAXBATCH]; /* bee velocities xv[bee#] */
short wx[3];
short wy[3];
short wxv;
short wyv;
} swarmstruct;
static swarmstruct swarms[MAXSCREENS];
void
initswarm(Window win, KRandomSequence &rnd)
{
swarmstruct *sp = &swarms[screen];
int b;
XWindowAttributes xwa;
sp->beecount = batchcount;
(void) XGetWindowAttributes(dsp, win, &xwa);
sp->width = xwa.width;
sp->height = xwa.height;
sp->border = (sp->width + sp->height) / 50;
/* Clear the background. */
XSetForeground(dsp, Scr[screen].gc, BlackPixel(dsp, screen));
XFillRectangle(dsp, win, Scr[screen].gc, 0, 0, sp->width, sp->height);
/* Now static data structures. epirker */
//if (!sp->segs) {
//sp->segs = (XSegment *) malloc(sizeof (XSegment) * sp->beecount);
//sp->old_segs = (XSegment *) malloc(sizeof (XSegment) * sp->beecount);
//sp->x = (short *) malloc(sizeof (short) * sp->beecount * TIMES);
//sp->y = (short *) malloc(sizeof (short) * sp->beecount * TIMES);
//sp->xv = (short *) malloc(sizeof (short) * sp->beecount);
//sp->yv = (short *) malloc(sizeof (short) * sp->beecount);
//}
/* Initialize point positions, velocities, etc. */
/* wasp */
sp->wx[0] = sp->border + rnd.getLong(sp->width - 2 * sp->border);
sp->wy[0] = sp->border + rnd.getLong(sp->height - 2 * sp->border);
sp->wx[1] = sp->wx[0];
sp->wy[1] = sp->wy[0];
sp->wxv = 0;
sp->wyv = 0;
/* bees */
for (b = 0; b < sp->beecount; b++) {
X(0, b) = rnd.getLong(sp->width);
X(1, b) = X(0, b);
Y(0, b) = rnd.getLong(sp->height);
Y(1, b) = Y(0, b);
sp->xv[b] = balance_rand(7);
sp->yv[b] = balance_rand(7);
}
}
void
drawswarm(Window win, KRandomSequence &rnd)
{
swarmstruct *sp = &swarms[screen];
int b;
/* <=- Wasp -=> */
/* Age the arrays. */
sp->wx[2] = sp->wx[1];
sp->wx[1] = sp->wx[0];
sp->wy[2] = sp->wy[1];
sp->wy[1] = sp->wy[0];
/* Accelerate */
sp->wxv += balance_rand(WASPACC);
sp->wyv += balance_rand(WASPACC);
/* Speed Limit Checks */
if (sp->wxv > WASPVEL)
sp->wxv = WASPVEL;
if (sp->wxv < -WASPVEL)
sp->wxv = -WASPVEL;
if (sp->wyv > WASPVEL)
sp->wyv = WASPVEL;
if (sp->wyv < -WASPVEL)
sp->wyv = -WASPVEL;
/* Move */
sp->wx[0] = sp->wx[1] + sp->wxv;
sp->wy[0] = sp->wy[1] + sp->wyv;
/* Bounce Checks */
if ((sp->wx[0] < sp->border) || (sp->wx[0] > sp->width - sp->border - 1)) {
sp->wxv = -sp->wxv;
sp->wx[0] += sp->wxv;
}
if ((sp->wy[0] < sp->border) || (sp->wy[0] > sp->height - sp->border - 1)) {
sp->wyv = -sp->wyv;
sp->wy[0] += sp->wyv;
}
/* Don't let things settle down. */
sp->xv[rnd.getLong(sp->beecount)] += balance_rand(3);
sp->yv[rnd.getLong(sp->beecount)] += balance_rand(3);
/* <=- Bees -=> */
for (b = 0; b < sp->beecount; b++) {
int distance, dx, dy;
/* Age the arrays. */
X(2, b) = X(1, b);
X(1, b) = X(0, b);
Y(2, b) = Y(1, b);
Y(1, b) = Y(0, b);
/* Accelerate */
dx = sp->wx[1] - X(1, b);
dy = sp->wy[1] - Y(1, b);
distance = abs(dx) + abs(dy); /* approximation */
if (distance == 0)
distance = 1;
sp->xv[b] += (dx * BEEACC) / distance;
sp->yv[b] += (dy * BEEACC) / distance;
/* Speed Limit Checks */
if (sp->xv[b] > BEEVEL)
sp->xv[b] = BEEVEL;
if (sp->xv[b] < -BEEVEL)
sp->xv[b] = -BEEVEL;
if (sp->yv[b] > BEEVEL)
sp->yv[b] = BEEVEL;
if (sp->yv[b] < -BEEVEL)
sp->yv[b] = -BEEVEL;
/* Move */
X(0, b) = X(1, b) + sp->xv[b];
Y(0, b) = Y(1, b) + sp->yv[b];
/* Fill the segment lists. */
sp->segs[b].x1 = X(0, b);
sp->segs[b].y1 = Y(0, b);
sp->segs[b].x2 = X(1, b);
sp->segs[b].y2 = Y(1, b);
sp->old_segs[b].x1 = X(1, b);
sp->old_segs[b].y1 = Y(1, b);
sp->old_segs[b].x2 = X(2, b);
sp->old_segs[b].y2 = Y(2, b);
}
XSetForeground(dsp, Scr[screen].gc, BlackPixel(dsp, screen));
XDrawLine(dsp, win, Scr[screen].gc,
sp->wx[1], sp->wy[1], sp->wx[2], sp->wy[2]);
XDrawSegments(dsp, win, Scr[screen].gc, sp->old_segs, sp->beecount);
XSetForeground(dsp, Scr[screen].gc, WhitePixel(dsp, screen));
XDrawLine(dsp, win, Scr[screen].gc,
sp->wx[0], sp->wy[0], sp->wx[1], sp->wy[1]);
if (!mono && Scr[screen].npixels > 2) {
XSetForeground(dsp, Scr[screen].gc, Scr[screen].pixels[sp->pix]);
if (++sp->pix >= Scr[screen].npixels)
sp->pix = 0;
}
XDrawSegments(dsp, win, Scr[screen].gc, sp->segs, sp->beecount);
}
//-----------------------------------------------------------------------------
#include <tqcheckbox.h>
#include <tqlabel.h>
#include <tqcolor.h>
#include <tqlayout.h>
#include <klocale.h>
#include <kmessagebox.h>
#include "swarm.h"
#include "swarm.moc"
#include "helpers.h"
#undef Below
static kSwarmSaver *saver = NULL;
void startScreenSaver( Drawable d )
{
if ( saver )
return;
saver = new kSwarmSaver( d );
}
void stopScreenSaver()
{
if ( saver )
delete saver;
saver = NULL;
}
int setupScreenSaver()
{
kSwarmSetup dlg;
return dlg.exec();
}
//-----------------------------------------------------------------------------
kSwarmSaver::kSwarmSaver( Drawable drawable ) : kScreenSaver( drawable )
{
readSettings();
// Clear to background colour when exposed
XSetWindowBackground(qt_xdisplay(), mDrawable,
BlackPixel(qt_xdisplay(), qt_xscreen()));
colorContext = TQColor::enterAllocContext();
batchcount = maxLevels;
initXLock( mGc );
initswarm( mDrawable, rnd );
timer.start( speed );
connect( &timer, TQT_SIGNAL( timeout() ), TQT_SLOT( slotTimeout() ) );
}
kSwarmSaver::~kSwarmSaver()
{
timer.stop();
TQColor::leaveAllocContext();
TQColor::destroyAllocContext( colorContext );
}
void kSwarmSaver::setSpeed( int spd )
{
timer.stop();
speed = MAXSPEED - spd;
timer.start( speed );
}
void kSwarmSaver::setLevels( int l )
{
batchcount = maxLevels = l;
initswarm( mDrawable, rnd );
}
void kSwarmSaver::readSettings()
{
KConfig *config = klock_config();
config->setGroup( "Settings" );
speed = MAXSPEED - config->readNumEntry( "Speed", MAXSPEED - DEFSPEED );
maxLevels = config->readNumEntry( "MaxLevels", DEFBATCH );
delete config;
}
void kSwarmSaver::slotTimeout()
{
drawswarm( mDrawable, rnd );
}
//-----------------------------------------------------------------------------
kSwarmSetup::kSwarmSetup( TQWidget *parent, const char *name )
: KDialogBase( parent, name, true, i18n( "Setup Swarm Screen Saver" ),
Ok|Cancel|Help, Ok, true )
{
readSettings();
setButtonText( Help, i18n( "A&bout" ) );
TQWidget *main = makeMainWidget();
TQHBoxLayout *top = new TQHBoxLayout( main, 0, spacingHint() );
TQVBoxLayout *left = new TQVBoxLayout(top, spacingHint());
TQLabel *label = new TQLabel( i18n("Speed:"), main );
min_size(label);
left->addWidget(label);
TQSlider *slider = new TQSlider(MINSPEED, MAXSPEED, 10, speed,
Qt::Horizontal, main );
slider->setMinimumSize( 120, 20 );
slider->setTickmarks(TQSlider::Below);
slider->setTickInterval(10);
connect( slider, TQT_SIGNAL( valueChanged( int ) ),
TQT_SLOT( slotSpeed( int ) ) );
left->addWidget(slider);
label = new TQLabel( i18n("Number of bees:"), main );
min_size(label);
left->addWidget(label);
slider = new TQSlider(MINBATCH, MAXBATCH, 20, maxLevels,Qt::Horizontal, main );
slider->setMinimumSize( 120, 20 );
slider->setTickmarks(TQSlider::Below);
slider->setTickInterval(20);
connect( slider, TQT_SIGNAL( valueChanged( int ) ),
TQT_SLOT( slotLevels( int ) ) );
left->addWidget(slider);
left->addStretch();
preview = new TQWidget( main );
preview->setFixedSize( 220, 170 );
preview->setBackgroundColor( black );
preview->show(); // otherwise saver does not get correct size
saver = new kSwarmSaver( preview->winId() );
top->addWidget(preview);
top->addStretch();
}
void kSwarmSetup::readSettings()
{
KConfig *config = klock_config();
config->setGroup( "Settings" );
speed = config->readNumEntry( "Speed", speed );
if ( speed > MAXSPEED )
speed = MAXSPEED;
else if ( speed < MINSPEED )
speed = MINSPEED;
maxLevels = config->readNumEntry( "MaxLevels", DEFBATCH );
delete config;
}
void kSwarmSetup::slotSpeed( int num )
{
speed = num;
if ( saver )
saver->setSpeed( speed );
}
void kSwarmSetup::slotLevels( int num )
{
maxLevels = num;
if ( saver )
saver->setLevels( maxLevels );
}
void kSwarmSetup::slotOk()
{
KConfig *config = klock_config();
config->setGroup( "Settings" );
TQString sspeed;
sspeed.setNum( speed );
config->writeEntry( "Speed", sspeed );
TQString slevels;
slevels.setNum( maxLevels );
config->writeEntry( "MaxLevels", slevels );
config->sync();
delete config;
accept();
}
void kSwarmSetup::slotHelp()
{
KMessageBox::information(this,
i18n("Swarm\n\nCopyright (c) 1991 by Patrick J. Naughton\n\nPorted to kscreensaver by Emanuel Pirker."),
i18n("About Swarm"));
}