pods::SDLx::Sprite::AnUsereContributed Perl Docpods::SDLx::Sprite::Animated(3)NAME
SDLx::Sprite::Animated - create animated SDL sprites easily!
CATEGORY
Extension
SYNOPSIS
use SDLx::Sprite::Animated;
# simplest possible form, where 'hero.png' is an image containing
# fixed-length sprites in sequence. It doesn't matter if they are
# placed vertically or horizontally, as long as the the widest
# side is a multiple of the (narrowest) other. The widget will
# automatically divide it in the proper frames, provided there is
# no slack space between each frame.
my $animation = SDLx::Sprite::Animated->new->load('hero.png');
# that's it! Defaults are sane enough to DWIM in simple cases,
# so you just have to call draw() on the right place. If you
# need to setup your animation or have more control over it,
# feel free to use the attributes and methods below.
# these are the most useful methods to use in your game loop
# (or wherever you want to manipulate the animation):
$animation->next;
$animation->previous;
$animation->reset;
$animation->current_frame; # current frame number
$animation->current_loop; # current loop number
# you can control positioning just like a regular SDLx::Sprite:
$animation->rect
$animation->x;
$animation->y;
# just like a regular Sprite, we fetch our source rect from ->clip,
# updating it on each call to ->next (or ->previous, or ->reset).
# If source rects for your animation are further apart (or less)
# than the rect's width and height, you can adjust the animation
# x/y offsets:
$animation->step_x(15);
$animation->step_y(30);
$animation->draw($screen); # remember to do this! :)
# we can also call ->next() automatically after each draw():
$animation->start;
$animation->stop;
# default is to go to the next frame at each draw(). If this is
# too fast for you, change the attribute below:
$animation->ticks_per_frame(10);
# select type of animation loop when it reaches the last frame:
$animation->type('circular'); # restarts loop at the beginning
$animation->type('reverse'); # goes backwards
$animation->max_loops(3); 0 or undef for infinite looping
# as usual, you can setup most of the above during object spawning
my $animation = SDLx::Sprite::Animated->new(
image => 'hero.png',
rect => SDL::Rect->new(...),
step_x => 20,
step_y => 0,
...
);
DESCRIPTION
An animation is a series of frames that are played in order. Frames are
loaded from an image, usually referred to as a Sprite Sheet or Sprite
Strip.
This module let's you interact with such strips and create sprite
animations just as easily as you would manipulate a regular
SDLx::Sprite object.
WARNING! VOLATILE CODE AHEAD
This is a new module and the API is subject to change without notice.
If you care, please join the discussion on the #sdl IRC channel in
irc.perl.org. All thoughts on further improving the API are welcome.
You have been warned :)
ATTRIBUTES AND METHODS
SDLx::Sprite::Animated is a subclass of SDLx::Sprite, inheriting all
its attributes and methods. Please refer to that module's documentation
for information on those.
The one difference in behavior is that, while a standard SDLx::Sprite
uses "->clip()" to select the part of the surface to display,
SDLx::Sprite::Animated treats "->clip()" as the initial rect, from
which to start the animation.
The following attributes and methods are available:
new
new( %options )
Creates a new SDLx::Sprite::Animated object. No option is mandatory. It
accepts all the options from a regular SDLx::Sprite object plus these:
· step_x => $integer
Uses $integer as the number of pixels to move on the x-axis (left-
to-right, 0 being no dislocation whatsoever, when the strip goes
from top to bottom) to reach the next frame.
· step_y => $integer
Uses $integer as the number of pixels to move on the y-axis (top-
to-bottom, 0 being no dislocation whatsoever, when the strip goes
from left to right) to reach the next frame.
· max_loops => $integer
Uses $integer as the number of times to loop the animation (when it
reaches the end of the strip).
· ticks_per_frame => $integer
Uses $integer to set how many calls to draw() must be issued before
we go to the next frame during autoplay (i.e. between calls to
start() and stop()).
· type => $string
Uses $string to set the type of animation loop when it reaches the
last frame in the strip. See the type() method below for
information on available looping types.
· sequences => { $string => [ [ $x1, $y1 ], [ $x2, $y2 ], ... ], ...
}
Uses the supplied hashref to define named sequences of frames.
· sequence => $string
Uses $string to set the current sequence.
step_x()
step_x( $integer )
Uses $integer as the number of pixels to move on the x-axis (left-to-
right, 0 being no dislocation whatsoever, when the strip goes from top
to bottom) to reach the next frame.
Defaults to the same width as the clip() rect.
step_y()
step_y( $integer )
Uses $integer as the number of pixels to move on the y-axis (top-to-
bottom, 0 being no dislocation whatsoever, when the strip goes from
left to right) to reach the next frame.
Defaults to the same height as the clip() rect.
max_loops()
max_loops( $integer )
Uses $integer as the number of times to loop the animation (when it
reaches the end of the strip). After that all calls to previous() or
next() will be no-ops.
Set it to 0 or "undef" to allow infinite loops. Default is 0
(infinite).
ticks_per_frame()
ticks_per_frame( $integer )
Uses $integer to set how many calls to draw() must be issued before we
go to the next frame during autoplay (i.e. between calls to start() and
stop()).
Default is just 1 tick per frame, so you might want to change this if
it's too fast.
type()
type( $string )
Uses $string to set the type of animation loop when it reaches the last
frame in the strip. Available looping types are:
· 'circular'
Restarts loop at the beginning of the strip. If you have 4 frames,
the flow will be 1-2-3-4-1-2-3-4-1-2-3-4-1-2-... up until the
number of loops you set in the max_loops() attribute.
· 'reverse'
Loops back and forth on the strip. If you have 4 frames, the flow
will be 1-2-3-4-3-2-1-2-3-4-3-2-... up until the number of loops
you set in the max_loops() attribute.
Case is irrelevant for type(), so for example 'Circular', 'CIRCULAR'
and 'CiRcUlAr' are all accepted as 'circular'. The return value is
guaranteed to be lowercase.
Default value is 'circular'.
set_sequences( $string => [ [ $x1, $y1 ], [ $x2, $y2 ], ... ], ... )
Uses the supplied hashref to define named sequences of frames. Replaces
any previously defined sequences.
sequence( $string )
Uses $string to set the current sequence. Goes to the first frame in
the sequence and resets the loop counter.
next()
Goes to the next frame in the strip. Calling this method will also
reset the tick counter used by ticks_per_frame().
If max_loops() has reached its limit, this will be a no-op.
Returns the object, allowing method chaining.
previous()
Goes to the previous frame in the strip. Calling this method will also
reset the tick counter used by ticks_per_frame().
If max_loops() has reached its limit, this will be a no-op.
Returns the object, allowing method chaining.
reset()
Goes to the first frame in the strip, meaning whatever clip is set to.
If max_loops() has reached its limit, this will be a no-op.
Returns the object, allowing method chaining.
current_frame()
Returns the current frame number. Note that this is 1-based (first
frame is 1, second is 2, etc).
current_loop()
Returns the loop counter, i.e. which run number is it at. This is also
1-based (first time is 1, second time is 2, etc). Note that we only
keep track of the counter if max_loops() is set to a finite number.
Otherwise, this will be a no-op.
start()
After you call this method, the object will issue a call to "->next()"
automatically for you every time "->draw()" is called
"ticks_per_frame()" times.
If you want to stop autoplay, see "stop()" below.
Default is off (no autoplay).
stop()
Stops autoplay. After you call this, the object will need you to call
"->previous()" and "->next()" explicitly to change frames.
To resume autoplay from wherever you are, use "start()".
If you want to restart autoplay from the initial frame, just do:
$sprite->reset->start;
AUTHORS
See "AUTHORS" in SDL.
SEE ALSO
SDL::Surface, SDL
perl v5.18.1 2013-09-28 pods::SDLx::Sprite::Animated(3)
