NAME

SDL::Cursor - a SDL perl extension

SYNOPSIS

 $cursor = new SDL::Cursor      -data => new SDL::Surface "cursor.png", 
                                -mask => new SDL::Surface "mask.png",
                                -x => 0, -y => 0;

DESCRIPTION

        To create a new cursor, create a new instance of the Cursor
class passing it two surfaces as shown in the example.  The x and
y values indicate the position of the hot-spot for clicking.

To move the cursor to a position on the screen use the warp method passing the values of x and y. The warp function does not require an instance to have been created, and can be safely used directly.

        SDL::Cursor::warp(x,y);
        $cursor->warp(200,200);

Similary, to toggle the visible status of the cursor use the show method:

        SDL::Cursor::show(0);   # this hides the cursor
        $cursor->show(1);       # make the cursor visible

If you have created a new Cursor, to set it as the active cursor use the method 'use':

        $cursor->use();

Finally, if you are using more than one instance of a SDL_Cursor *, you may find the get method useful for finding out the current cursor.

        SDL::Cursor::get();
        $cursor->get();

NB: This will not return the value of that instance, but rather the instance currently in use;

AUTHOR

David J. Goehrig

SEE ALSO

perl(1) SDL::Surface(3).