NAME

Game::Pexeso::Spinner - A spinner used to show progress.

SYNOPSIS

            

              
              
my $spinner = Game::Pexeso::Spinner->new();
$spinner->set_position(100, 100);
$stage->add($spinner);
$stage->signal_connect('button-release-event', sub {
        my ($actor, $event) = @_;
        if ($event->button == 1) {
                print "Start\n";
                $spinner->pulse_animation_start();
        }
        elsif ($event->button == 2) {
                print "Stop\n";
                $spinner->pulse_animation_stop();
        }
        else {
                print "Once\n";
                $spinner->pulse_animation_step();
        }
});
            
          

DESCRIPTION

A spinner showing progress that can be animated.

METHODS

The following methods are available:

new

Creates a new spinner.

Usage:

            

              
              
my $spinner = Game::Pexeso::Spinner->new();
            
          

pulse_animation_step

Animates the spinner group of one step.

pulse_animation_start

Animates the spinner group continuously until pulse_animation_stop() is called.

pulse_animation_stop

Stop a previous animation that was started with pulse_animation_start().

AUTHORS

Emmanuel Rodriguez <potyl@cpan.org>.

COPYRIGHT AND LICENSE

Copyright (C) 2009 by Emmanuel Rodriguez.

This library is free software; you can redistribute it and/or modify it under the same terms of:

the GNU Lesser General Public License, version 2.1; or

the Artistic License, version 2.0.

This module is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

You should have received a copy of the GNU Library General Public License along with this module; if not, see http://www.gnu.org/licenses/.

For the terms of The Artistic License, see perlartistic.