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

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

NAME

       SDL::VideoInfo - Video Target Information

   CATEGORY
       Core, Video, Structure

SYNOPSIS

	       my $video_info = SDL::Video::get_video_info();

       VideoInfo is only accessible "SDL::Video::get_video_info". This module only provides getters to the struct "SDL_VideoInfo".

DESCRIPTION

       This object is a read-only structure and is returned by "SDL::Video::get_video_info". It contains information on either the best available
       mode if called before "SDL::Video::set_video_mode" or the current video mode if called after "SDL::Video::set_video_mode".

METHODS

   hw_available
	       $video_info->hw_available() # 1 if Hardware Accelerated Surfaces available

       Is it possible to create hardware surfaces ?

   wm_available
	       $video_info->wm_available() # 1 if Window Manager available

       Is there a window manager available ?

   blit_hw
	       $video_info->blit_hw()

       Are hardware to hardware blits accelerated ?

   blit_hw_CC
	       $video_info->blit_hw_CC()

       Are hardware to hardware colorkey blits accelerated ?

   blit_hw_A
	       $video_info->blit_hw_A()

       Are hardware to hardware alpha blits accelerated ?

   blit_sw
	       $video_info->blit_sw()

       Are software to hardware blits accelerated ?

   blit_sw_CC
	       $video_info->blit_sw_CC()

       Are software to hardware colorkey blits accelerated ?

   blit_sw_A
	       $video_info->blit_sw_A()

       Are software to hardware alpha blits accelerated ?

   blit_fill
	       $video_info->blit_fill()

       Are color fills accelerated ?

   video_mem
	       my $video_mem = $video_info->video_mem();

       Total amount of video memory in Kilobytes, should be accessed only if hw_available == 1, otherwise it is equal to 0

   vfmt
	       my $vd_pixel_format = $video_info->vfmt();

       "SDL::PixelFormat" of the video device

   current_w, current_h
	       $video_info->current_w();
	       $video_info->current_h();

       Width and height of the current video mode, or of the desktop mode if "SDL_GetVideoInfo" was called before "SDL::Video::set_video_mode"
       (available since SDL 1.2.10)

SEE ALSO

       SDL::Video, SDL::PixelFormat

AUTHORS

       See "AUTHORS" in SDL.

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

Check Out this Related 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)

Linux and UNIX Man Pages

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

Check Out this Related Man Page