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.
420 lines
10 KiB
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
|
|
*/
|
|
// tqlayout 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"));
|
|
}
|