Graphics::Raylib::Color - Use predefined Raylib colors or define your own
version 0.003
use Graphics::Raylib::Color; my $color = Graphics::Raylib::Color::BLACK; my $gray = Graphics::Raylib::Color::rgb(127,127,127); my $rainbow = Graphics::Raylib::Color::rainbow(colors => 100); push @colors, $rainbow->cycle for (1..100);
Colors you can pass to raylib.
As a color is basically a 32-bit integer (RGBA) in raylib, the constructors rgba and rgb do little more packing it into an integer and blessing it. Interpolating a color into a string results in a tuple of the form "(r: %u, g: %u, b: %u, a: %u)".
"(r: %u, g: %u, b: %u, a: %u)"
Constructs a new Graphics::Raylib::Color instance.
Constructs a new Graphics::Raylib::Color instance out of an opaque color. Calls rgba with $alpha = 255.
rgba
$alpha = 255
Returns a list with the red, green, blue and alpha components of the color.
use constant LIGHTGRAY => rgb( 200, 200, 200 ); use constant GRAY => rgb( 130, 130, 130 ); use constant DARKGRAY => rgb( 80, 80, 80 ); use constant LIGHTGREY => rgb( 200, 200, 200 ); use constant GREY => rgb( 130, 130, 130 ); use constant DARKGREY => rgb( 80, 80, 80 ); use constant YELLOW => rgb( 253, 249, 0 ); use constant GOLD => rgb( 255, 203, 0 ); use constant ORANGE => rgb( 255, 161, 0 ); use constant PINK => rgb( 255, 109, 194 ); use constant RED => rgb( 230, 41, 55 ); use constant MAROON => rgb( 190, 33, 55 ); use constant GREEN => rgb( 0, 228, 48 ); use constant LIME => rgb( 0, 158, 47 ); use constant DARKGREEN => rgb( 0, 117, 44 ); use constant SKYBLUE => rgb( 102, 191, 255 ); use constant BLUE => rgb( 0, 121, 241 ); use constant DARKBLUE => rgb( 0, 82, 172 ); use constant PURPLE => rgb( 200, 122, 255 ); use constant VIOLET => rgb( 135, 60, 190 ); use constant DARKPURPL => rgb( 112, 31, 126 ); use constant BEIGE => rgb( 211, 176, 131 ); use constant BROWN => rgb( 127, 106, 79 ); use constant DARKBROWN => rgb( 76, 63, 47 ); use constant WHITE => rgb( 255, 255, 255 ); use constant BLACK => rgb( 0, 0, 0 ); use constant BLANK => rgba( 0, 0, 0, 0 ); use constant MAGENTA => rgb( 255, 0, 255 ); use constant RAYWHITE => rgb( 245, 245, 245 );
Returns a code reference that cycles through the rainbow colors on each evaluation. $color_count is the total number of colors before bouncing back. Default is 7.
$color_count
7
http://github.com/athreef/Graphics-Raylib
Graphics-Raylib
Graphics-Raylib-XS
Ahmad Fatoum <athreef@cpan.org>, http://a3f.at
<athreef@cpan.org>
Copyright (C) 2017 Ahmad Fatoum
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Graphics::Raylib, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Graphics::Raylib
CPAN shell
perl -MCPAN -e shell install Graphics::Raylib
For more information on module installation, please visit the detailed CPAN module installation guide.