summaryrefslogtreecommitdiffstats
path: root/kscreensaver/xsavers/swarm.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'kscreensaver/xsavers/swarm.cpp')
-rw-r--r--kscreensaver/xsavers/swarm.cpp419
1 files changed, 0 insertions, 419 deletions
diff --git a/kscreensaver/xsavers/swarm.cpp b/kscreensaver/xsavers/swarm.cpp
deleted file mode 100644
index 0707abc6..00000000
--- a/kscreensaver/xsavers/swarm.cpp
+++ /dev/null
@@ -1,419 +0,0 @@
-/*-
- * 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. ([email protected])
- */
-
-/* Ported to kscreensaver:
- July 1997, Emanuel Pirker <[email protected]>
- Contact me in case of problems, not the original author!
- Last revised: 10-Jul-97
-*/
-// layout management added 1998/04/19 by Mario Weilguni <[email protected]>
-
-#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(tqt_xdisplay(), mDrawable,
- BlackPixel(tqt_xdisplay(), tqt_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()
-{
- TDEConfig *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()
-{
- TDEConfig *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()
-{
- TDEConfig *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"));
-}