sdl::mouse(3pm) [debian man page]

pods::SDL::Mouse(3pm)					User Contributed Perl Documentation				     pods::SDL::Mouse(3pm)

NAME

       SDL::Mouse - SDL Bindings for the Mouse device

CATEGORY

       Core, Mouse

CONSTANTS

       The constants for SDL::Mouse belong to SDL::Events/SDL::Event, under the export tag of ':state'.

METHODS

   warp_mouse
	SDL::Mouse::warp_mouse( $x, $y );

       Set the position of the mouse cursor (generates a mouse motion event).  Even if the mouse is warped to where it currently is, a mouse
       motion event is generated.

   set_cursor
	SDL::Mouse::set_cursor( $cursor_object );

       Sets the currently active cursor to the specified one.  See SDL::Cursor for details on cursor objects.  If the cursor is currently visible,
       the change will be immediately represented on the display.  "set_cursor()" can be used to force cursor redraw, if this is desired for any
       reason.

   get_cursor
	my $cursor_object = SDL::Mouse::get_cursor;

       Gets the currently active mouse cursor.

   show_cursor
	my $return = SDL::Mouse::show_cursor( $state );

       Toggle whether or not the cursor is shown on the screen.  Passing "SDL_ENABLE" displays the cursor and passing "SDL_DISABLE" hides it.  The
       current state of the mouse cursor can be queried by passing "SDL_QUERY", either "SDL_DISABLE" or "SDL_ENABLE" will be returned.

	use SDL;
	use SDL::Mouse;
	use SDL::Video;
	use SDL::Events ':state'; #For the constants

	SDL::init(SDL_INIT_VIDEO);
	SDL::Video::set_video_mode(640, 480, 16, SDL_SWSURFACE);

	printf("Cursor is %s
", SDL::Mouse::show_cursor(SDL_QUERY) ? 'visible' : 'not visible');

	sleep(3);

	SDL::Mouse::show_cursor(SDL_DISABLE);
	printf("Cursor is %s
", SDL::Mouse::show_cursor(SDL_QUERY) ? 'visible' : 'not visible');

	sleep(3);

	SDL::Mouse::show_cursor(SDL_ENABLE);
	printf("Cursor is %s
", SDL::Mouse::show_cursor(SDL_QUERY) ? 'visible' : 'not visible');

	sleep(3);

SEE ALSO

       SDL::Cursor

AUTHORS

       See "AUTHORS" in SDL.

perl v5.14.2							    2012-05-28						     pods::SDL::Mouse(3pm)

pods::SDL::Overlay(3pm) 				User Contributed Perl Documentation				   pods::SDL::Overlay(3pm)

NAME

       SDL::Overlay - YUV Video overlay

   CATEGORY
       Core, Video, Structure

SYNOPSIS

       First import the following modules to get access to constants and functions needed for overlay.

	  use SDL;
	  use SDL::Video;
	  use SDL::Overlay;

       Init the video subsystem.

	  SDL::Init(SDL_INIT_VIDEO);

       Create a display to use.

	  my $display = SDL::Video::set_video_mode(640, 480, 32, SDL_SWSURFACE);

       Create and attach the display to a new overlay

	  my $overlay = SDL::Overlay->new( 100, 100, SDL_YV12_OVERLAY, $display);

DESCRIPTION

       A "SDL_Overlay" allows for video rendering on an "SDL_Surface" which is a display.

       The term 'overlay' is a misnomer since, unless the overlay is created in hardware, the contents for the display surface underneath the area
       where the overlay is shown will be overwritten when the overlay is displayed.

METHODS

   new ( $width, $height, $YUV_flag, $display)
       The constructor creates a SDL::Overlay of the specified width, height and format (see "YUV_Flags" list below of available formats), for the
       provided display.

       Note the 'display' argument needs to actually be the surface created by "SDL::Video::SetVideoMode" otherwise this function will segfault.

	  my $overlay = SDL::Overlay->new( $width, $height, $YUV_flag, $display );

       YUV_Flags

       More information on YUV formats can be found at <http://www.fourcc.org/indexyuv.htm> .

       o   SDL_YV12_OVERLAY  0x32315659  /* Planar mode: Y + V + U */

       o   SDL_IYUV_OVERLAY  0x56555949  /* Planar mode: Y + U + V */

       o   SDL_YUY2_OVERLAY  0x32595559  /* Packed mode: Y0+U0+Y1+V0 */

       o   SDL_UYVY_OVERLAY  0x59565955  /* Packed mode: U0+Y0+V0+Y1 */

       o   SDL_YVYU_OVERLAY  0x55595659  /* Packed mode: Y0+V0+Y1+U0 */

   format
       Overlay format (see YUV_Flags)

   w, h
       Width and height of overlay

   planes
       Number of planes in the overlay. Usually either 1 or 3

   pitches
       An array of pitches, one for each plane. Pitch is the length of a row in bytes.

   pixels
       As of release 2.3 direct right to overlay is disable.

       An array of pointers to the data of each plane. The overlay should be locked before these pointers are used.

       see SDL::Video::lock_YUV_overlay, SDL::Video::unload_YUV_overlay

   hw_overlay
       This will be set to 1 if the overlay is hardware accelerated.

AUTHORS

       See "AUTHORS" in SDL.

perl v5.14.2							    2012-05-28						   pods::SDL::Overlay(3pm)