37 lines
724 B
Plaintext
37 lines
724 B
Plaintext
using Color, Images, FixedPointNumbers
|
|
|
|
function hexify(pxl::RGB)
|
|
p = reinterpret(Uint8, [pxl.r, pxl.g, pxl.b])
|
|
join(map(x->hex(x, 2), p))
|
|
end
|
|
|
|
function showimagehex(a::Image)
|
|
s = " "
|
|
for i in 1:height(a)
|
|
for j in 1:width(a)
|
|
s *= " "*hexify(a["x", j, "y", i])
|
|
end
|
|
s *= "\n "
|
|
end
|
|
return s
|
|
end
|
|
|
|
w = 5
|
|
h = 7
|
|
cback = RGB(1, 0, 1)
|
|
cfore = RGB(0, 1, 0)
|
|
|
|
a = Array(RGB{Ufixed8}, h, w)
|
|
img = Image(a)
|
|
|
|
println("Uninitialized image:")
|
|
println(showimagehex(img))
|
|
|
|
fill!(img, cback)
|
|
println("Image filled with background color:")
|
|
println(showimagehex(img))
|
|
|
|
img["x", 2, "y", 3] = cfore
|
|
println("Image with a pixel set for foreground color:")
|
|
println(showimagehex(img))
|