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.