1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
|
#pike __REAL_VERSION__
//! @decl array(int(0..255)) rgb_to_hsv(array(int(0..255)) rgb)
//! @decl array(int(0..255)) rgb_to_hsv(int(0..255) r, int(0..255) g, int(0..255) b)
//!
//! This function returns the HSV value of the color
//! described by the provided RGB value. It is essentially
//! calling Image.Color.rgb(r,g,b)->hsv().
//!
//! @seealso
//! @[Colors.hsv_to_rgb()]
//! @[Image.Color.Color.hsv()]
//!
array(int(0..255)) rgb_to_hsv(int(0..255) r, int(0..255) g, int(0..255) b)
{
return Image.Color.rgb(r,g,b)->hsv();
}
variant array(int(0..255)) rgb_to_hsv(array(int(0..255)) rgb)
{
return Image.Color.rgb(@rgb)->hsv();
}
//! @decl array(int(0..255)) hsv_to_rgb(array(int(0..255)) hsv)
//! @decl array(int(0..255)) hsv_to_rgb(int(0..255) h, int(0..255) s, int(0..255) v)
//!
//! This function returns the RGB value of the color
//! described by the provided HSV value. It is essentially
//! calling Image.Color.hsv(h,s,v)->rgb().
//!
//! @seealso
//! @[Colors.rgb_to_hsv()]
//! @[Image.Color.hsv()]
//!
array(int(0..255)) hsv_to_rgb(int(0..255) h, int(0..255) s, int(0..255) v)
{
return Image.Color.hsv(h,s,v)->rgb();
}
variant array(int(0..255)) hsv_to_rgb(array(int(0..255)) hsv)
{
return Image.Color.hsv(@hsv)->rgb();
}
//! @decl array(int(0..100)) rgb_to_cmyk(array(int(0..255)) rgb)
//! @decl array(int(0..100)) rgb_to_cmyk(int(0..255) r, int(0..255) g, int(0..255) b)
//!
//! This function returns the CMYK value of the color
//! described by the provided RGB value. It is essentially
//! calling Image.Color.rgb(r,g,b)->cmyk().
//!
//! @seealso
//! @[Colors.cmyk_to_rgb()]
//! @[Image.Color.Color.cmyk()]
//!
array(int(0..100)) rgb_to_cmyk(int(0..255) r, int(0..255) g, int(0..255) b)
{
return (array(int))map(Image.Color.rgb(r,g,b)->cmyk(), round);
}
variant array(int(0..100)) rgb_to_cmyk(array(int(0..255)) rgb)
{
return (array(int))map(Image.Color.rgb(@rgb)->cmyk(), round);
}
//! @decl array(int(0..255)) cmyk_to_rgb(array(int(0..100)) cmyk)
//! @decl array(int(0..255)) cmyk_to_rgb(int(0..100) c, int(0..100) m, int(0..100) y, int(0..100) k)
//!
//! This function return the RGB value of the color
//! describe by the provided CMYK value. It is essentially
//! calling Image.Color.cmyk(c,m,y,k)->rgb()
//!
//! @seealso
//! @[Colors.rgb_to_cmyk()]
//! @[Image.Color.cmyk()]
//!
array(int(0..255)) cmyk_to_rgb(int c, int|void m, int|void y, int|void k)
{
return Image.Color.cmyk(c,m,y,k)->rgb();
}
variant array(int(0..255)) cmyk_to_rgb(array(int) cmyk)
{
return Image.Color.cmyk(@cmyk)->rgb();
}
//! This function returns the RGB values that corresponds to the
//! color that is provided by name to the function. It is
//! essentially calling @[Image.Color.guess()], but returns the
//! default value (or black if none is provided) if it failes.
//!
array(int(0..255)) parse_color(string name, void|array(int) def)
{
Image.Color.Color color;
if(!name || !sizeof(name)) return def||({ 0,0,0 }); // Odd color...
if(color=Image.Color.guess(name)) return color->rgb();
name = replace(lower_case(name), "gray", "grey");
if(color=Image.Color.guess(name)) return color->rgb();
// Lets call it black and be happy..... :-)
return def||({ 0,0,0 });
}
//! Tries to find a name to color described by the provided RGB
//! values. Partially an inverse function to @[Colors.parse_color()],
//! although it can not find all the names that @[Colors.parse_color()]
//! can find RGB values for. Returns the colors rgb hex value prepended
//! with "#" upon failure.
//!
string color_name(array(int(0..255)) rgb)
{
if(!arrayp(rgb) || sizeof(rgb)!=3) return "-";
string name = Image.Color(@rgb)->name();
return name;
}
|
